1. Информатика
  2. Ввести с клавиатуры 10

Ввести с клавиатуры 10 чисел - положительных и отрицательных. заменить все отрицательные числа их модулями и напечатать все полученные 10 чисел. это в паскале. напишите саму программу

brikabrakenerge brikabrakenerge    3   08.03.2019 18:20    5

Ответы
Дамир2207 Дамир2207  24.05.2020 07:40

var a:array [1..10] of integer;

      i:integer;

begin

  for i:=1 to 10 do begin

  readln(a[i]);

  if a[i]<0 then a[i]:=abs(a[i]);

  writeln(a[i]);

  end;

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Wenros Wenros  19.09.2019 04:50
Впервый день лыжник пробежал 3 км. , каждый следующий день он прибавлял по пол. км. составить программу, которая находит через сколько дней его суммарный пробег превысет 50...
grskdarina grskdarina  19.09.2019 04:50
Составить программу, которая в процессе беседы с пользователем, выясняет сколько ему лет...
Reginalolo Reginalolo  19.09.2019 04:50
Среднее значение четырёх чисел равно одной четверти суммы этих четырёх чисел. написать программу, которая находит среднее значение этих четырёх чисел...
рудный1 рудный1  19.09.2019 04:50
Стадион вмещает m зрителей, билет на футбольный матч стоит p рублей. определить выручку стадиона, если известно, что стадион был заполнен болельщиками на четыре пятых. составить...
bojkovnikita bojkovnikita  21.03.2021 16:20
Постройте график функции у=3х2 + 5х+1, указав заголовок (название графика, название осей) и подписи данных (значения, легенду) на отрезке [-2, 4] c шагом 0,5. По информатике...
ЭЩЩКЕРЕЕЕ ЭЩЩКЕРЕЕЕ  21.03.2021 16:16
Выполните арифметические операции над двоичными числами, представленными в формате с плавающей точкой. Результат выполнения арифметических операций представьте в десятичной...
Людочка6789 Людочка6789  21.03.2021 16:16
На питоне сделайте код Ввести с клавиатуры список из N элементов. Ввести его на экран. Сформировать на основе этого списка новый список, в который записать все нечетные элементы...
sasha2000val sasha2000val  21.03.2021 16:13
в трехзначном числе зачеркнули последнюю цифру .Когда в оставшемся двузначном числе переставили цифры ,а зачем преписали к ним слева последнюю цифру числа ,то получилось 654.Найдите...
Соря11 Соря11  21.03.2021 16:11
Перевести 1493 в 2-ную, 8-ную и 16-ную систему счисления....
Pandorica Pandorica  14.07.2019 07:40
15. файл размером 20 kb передается через некоторое соединение за 100 секунд. за сколько секунд можно передать этот же файл через соединение, скорость которого на 512 бит в...

Популярные вопросы