По языку программирования паскаль авс. массив д(6) заполняется с клавиатуры, вычесть квадраты всех элементов массива и вывести результат на экран в строку. записать на языке программирования.
Var i:integer; begin var ar:=ReadArrInteger(6); //инициализирую ввод массива из 6 элементов, 1 элемент - 0 for i:=0 to 5 do //цикл для возведения в квадрат ar[i]:=sqr(ar[i]); //возводит элемент в квадрат ar.Print(','); //вывод через запятую end.
begin
var ar:=ReadArrInteger(6); //инициализирую ввод массива из 6 элементов, 1 элемент - 0
for i:=0 to 5 do //цикл для возведения в квадрат
ar[i]:=sqr(ar[i]); //возводит элемент в квадрат
ar.Print(','); //вывод через запятую
end.