Паскаль:составить массив из 5 элементов с клавиатуры и вывести в ...
Паскаль:составить массив из 5 элементов с клавиатуры и вывести в строку.Если элемент положительный,то заменить его на противоположный.
Есть ответ
12.12.2022
302
Ответ
var a: array[1..5] of integer; i: integer;begin for i := 1 to 5 do begin readln(a[i]); if(a[i] < 0) then a[i] := a[i] * (-1); end; for i := 1 to 5 do write(a[i], ' ');end.
Если вы нашли правильное решение, вы можете поблагодарить нас начиная с 10 рублей.
Просто нажмите на кнопку "Подарить".
Просто нажмите на кнопку "Подарить".
12.12.2022