Написать на паскаль 1)сумма квадратов от 1 до n s=1+4+9+

demyaniuk demyaniuk    1   26.06.2019 15:10    0

Ответы
лисичка009 лисичка009  21.07.2020 11:39
Program programma;
Uses crt;

var n,s,i: integer;

Begin clrscr;
      write('Введите число N = ');
      readln(n);
write('S=');
for i:=1 to n-1 do
    begin
    s:=s+sqr(i);
    write(sqr(i),'+');
    end;
s:=s+sqr(n);
write(sqr(n),'=', s);
End.    
     
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика