Написать программу, которая выводит в столбик все целые числа от -10 до 10. Рядом печатает столбик модулей этих чисел. Пример оформления: -10 10 -11 11 ... 10
More Questions From This User See All
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Ответ:
program z1;
var i:integer;
begin
for i:=-10 to 10 do writeln(i:3,' ',abs(i):2)
end.