Question

в среде программирования Pascal сформируйте и выведите в строку через пробел без комментариев массив Z, состоящий из восьми элементов, заданных по формуле i*i+1. На следующей строке выведите, чему равна сумма элементов массива Z​

Answer 1

Ответ:

Pascal

var

 z: array[1..8] of integer;

 i, s:integer;

begin

 s:=0;

 for i:= 1 to 8 do begin

   z[i]:=i*i+1;

   write(z[i],' ');

   s:=s+z[i];

 end;  

 writeln();

 write('Сумма элементов = ', s)

end.