Найти сумму всех двухзначных четных натуральных чисел

vysocskij1961 vysocskij1961    2   10.07.2019 19:30    0

Ответы
ruslana0404 ruslana0404  17.09.2020 14:29
Var
    i, s: integer;

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