Здравствуйте,нужно решить задачу, помогите пожалуйста (срочно)!
Приложения:

bophloya:
на языке Паскаль!
Ответы
Ответ дал:
1
Ответ:
var
i, n, sum: integer;
begin
writeln('Input N:');
readln(n);
sum:=0;
for i:= 2 to n do
if i mod 2 = 0 then
sum := sum + i;
writeln(sum)
end.
Похожие вопросы
2 года назад
2 года назад
7 лет назад
7 лет назад
9 лет назад