Ввести с клавиатуры 10 чисел — положительных и отрицательных

Question

Ввести с клавиатуры 10 чисел — положительных и отрицательных. Заменить все отрицательные числа их модулями и напечатать все полученные 10 чисел.

Answer 1

47

gaura2

19 апреля 2023

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.

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: