Сформировать любой одномерный массив. Все его элементы возвести в квадрат. Вывести ответ в строку через пробел.
Ответы
Ответ дал:
0
begin
randomize;
var n:integer;
n:=random(11)+3;
var ar := arrrandom(n, -10, 10);
ar.Print;
writeln();
writeln();
ar.Select(x->sqr(x)).Print;
end.
randomize;
var n:integer;
n:=random(11)+3;
var ar := arrrandom(n, -10, 10);
ar.Print;
writeln();
writeln();
ar.Select(x->sqr(x)).Print;
end.
Похожие вопросы
2 года назад
7 лет назад
9 лет назад
9 лет назад
10 лет назад