Регистрация
Войти
Стать экспертом Правила
Информатика

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

ОТВЕТЫ



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
Контакты
Реклама на сайте
Спрошу
О проекте
Новым пользователям
Новым экспертам