Составьте программу, которая организует ввод массива а[1....10] с клавиатуры, затем преобразовывает массив, заменяя все отрицательные элементы их модулями.

Ответы:
Даша Поваляева
08-12-2013 15:07

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]); end; for i:=1 to 10 do writeln(a[i]); end.

Также наши пользователи интересуются:

Картинка с текстом вопроса от пользователя MEDINA POSTNIKOVA

⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Составьте программу, которая организует ввод массива а[1....10] с клавиатуры, затем преобразовывает массив, заменяя все отрицательные элементы их модулями.» от пользователя MEDINA POSTNIKOVA в разделе Экономика. Задавайте вопросы и делитесь своими знаниями.

Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!