Дан массив из 60 элементов(заполнен через датчик случайных чисел: числа от 10 до 45. все его элементы возвести в квадрат

DaNa1517 DaNa1517    2   08.04.2019 12:17    4

Ответы
avisotska avisotska  28.05.2020 21:26

Program n_1;

var i: integer; arr: array [1..60] of integer;

begin

   randomize;

   for i:=1 to 60 do begin arr[i]:=random(36)+10; write(arr[i]:4, ' '); arr[i]:=arr[i]*arr[i]; end;

   writeln();

   for i:=1 to 60 do write(arr[i]:4, ' ');

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика