Страница 163 §3.5 номер 13, ГДЗ по информатике за 8 класс к учебнику Босовой
Информатика 8 класс 8класс
ГДЗ к учебнику по информатике за 8 класс Босовой. Решения к номерам
Ответ и решение
program z13;var s1, s2,s3,n,i: integer ; begin write(''); readln(n); s1:=0; s2:=0; s3:=0; for i := 1 to n do begin s1:=s1+i; s2:=s2+sqr(i); if i mod 2 =0 then s3:=s3+i end; writeln('Сумма первых n > ',s1,'. Сумма квадратов n > ',s2,'. Сумма четных > ',s3); s1:=0; for i:=10 to 99 do s1:=s1+i; writeln('Сумма всех двузначных > ',s1)end.