8класс
Страница 163 §3.5 номер 13, ГДЗ по информатике за 8 класс к учебнику Босовой
Номер 13. Напишите программу, которая вычисляет сумму:
а) первых n натуральных чисел;
б) квадратов первых n натуральных чисел;
в) всех чётных чисел в диапазоне от 1 до n;
г) всех двузначных чисел.
а) первых n натуральных чисел;
б) квадратов первых n натуральных чисел;
в) всех чётных чисел в диапазоне от 1 до n;
г) всех двузначных чисел.
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.
