Написать программу для паскаль.С клавиатуры вводятся целые числа.Признаком конца ввода является 0.Изменить знак отрицательных чисел на противоположный.Результаты вывести на экран.

Предложу решение, основанное на том, что понял из текста) 

var a: integer;
begin
writeln(Вводите числа);
 a:=1;
while a<>0 do begin
readln(a);
if a<0 then writeln(Противоположное число ,abs(a));
end;
readln
end.

Можно их в массив записывать, если нужно вывести красиво.

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.