Есть ответ 👍

Вычеслите сумму квадратов всех четных чисел от1 до n

151
405
Посмотреть ответы 2

Ответы на вопрос:


var  i, n, s: integer; begin  readln(n);   for i : = 1 to n do begin    if(i mod 2 = 0) then s : = s + sqr(i);   end;   writeln(s); end.

Vikysiax99
4,6(29 оценок)

А) яблоко б) роза в) волк г) мяч

Популярно: Информатика