алгоритм нахождения суммы квадратов натуральных чётных чисел от 1 до 30.
заранее большое спасибо
желательно на завтра утром
Ответы на вопрос
Ответил Елизавета123455
0
Сумма квадратов натуральных чётных чисел от 1 до 30
var S,i: integer;
begin
for i:=1 to 30 do
if i mod 2=0 then s:=s+i*i;
writeln (s)end.
Выводит: 4960
var S,i: integer;
begin
for i:=1 to 30 do
if i mod 2=0 then s:=s+i*i;
writeln (s)end.
Выводит: 4960
Новые вопросы
Алгебра,
2 года назад
Обществознание,
2 года назад
Математика,
9 лет назад
Математика,
9 лет назад
Математика,
9 лет назад
Биология,
9 лет назад