
Talyusnag
5 год назад
Составьте программу, выводящую на экран все числа от -10 до 10, а также их модули.Образец вывода :ЧислоМодуль-1010-99-88......991010Язык Pascal
ОТВЕТЫ

Терентий
Oct 24, 2020
begin
Writeln('Число Модуль');
for var i:=-10 to 10 do
Writeln(i:3,Abs(i):6)
end.
Число Модуль
-10 10
-9 9
-8 8
-7 7
-6 6
-5 5
-4 4
-3 3
-2 2
-1 1
0 0
1 1
2 2
3 3
4 4
5 5
6 6
7 7
8 8
9 9
10 10
661
Смежные вопросы: