Написать программу на языке программирования paskal, которая будет находить сумму всех четных чисел в диапазоне от 1 до n (n- вводится с клавиатуры)

lubavoytenko003 lubavoytenko003    2   23.09.2019 06:10    0

Ответы
KimTaeHyung3012 KimTaeHyung3012  04.08.2020 16:55
Var i,n,s:integer;
begin;
  readln(n);
  for i:=1 to n do
    if i mod 2 = 0 then s:=s+i;
  writeln(s);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика