Задание 12 Параграф 4.5 ГДЗ Босова 8 класс 2023 (Информатика)

12. Напишите программу, которая вычисляет сумму: а) первых n натуральных чисел; б) квадратов первых п натуральных чисел; в) всех чётных чисел на отрезке от 1 до n;



Решение задачи: 12. Напишите программу, которая вычисляет сумму: а) первых n натуральных чисел; б) квадратов первых п натуральных чисел; в) всех чётных чисел на отрезке от 1 до n;

Ниже вариант решения задания из учебника Босова, Босова 8 класс, Бином:

12. Напишите программу, которая вычисляет сумму:

а) первых n натуральных чисел;

б) квадратов первых п натуральных чисел;

в) всех чётных чисел на отрезке от 1 до n;

г) всех двузначных чисел.

var

n, i, s1, s2, s3: integer;

begin

s1 := 0; s2 := 0; s3 := 0;

write(taskn > > task);

readln(n);

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(taskСумма первых task,n,task = task, s1);// а)

writeln(taskСумма квадратов первых task,n,task = task, s2);// б)

writeln(taskСумма четных от 1 до task,n,task = task, s3);// в)

s1 := 0;

for i := 10 to 99 do

s1 := s1 + i;

writeln(taskСумма всех двузначных = task, s1)// г)

end.

Окно вывода

n > > 15

Сумма первых 15 = 120

Сумма квадратов первых 15 = 1240

Сумма четных от 1 до 15 = 56

Сумма всех двузначных = 4905