С клавиатуры вводятся целые числа. Признаком конца ввода чисел является 0. изменить знак отрицательных чисел на положительный. Результаты вывести на экран.
С клавиатуры вводятся целые числа. Признаком конца ввода чисел является 0. изменить знак отрицательных чисел на положительный. Результаты вывести на экран.
Гость
Ответ(ы) на вопрос:
Гостьuses
System.Collections.Generic;
var
a: List := new List(); //Объявляем и создаём динамический массив
i: integer;
begin
repeat
readln(i);
if (i = 0) then
break
else
a.Add(i);
until (False); //Прекращаем цикл, когда рак (break) в цикле свиснет (False можно заменить на "2 + 2 = 5"
writeln(#13); //Вставляем 2 пустые строки
foreach i in a do //Выводим исходный массив
write(i, ' ');
writeln();
foreach i in a do //Выводим конечные числа, нет задачи массив изменять
write(abs(i), ' ');
end.
Не нашли ответ?
Похожие вопросы