Среди чисел от 100 до 1000 найти сумму тех чисел которые заканчиваются на цифру 4

andrewlitvinov4 andrewlitvinov4    1   29.07.2019 15:30    0

Ответы
alino4kakostina alino4kakostina  31.08.2020 01:58
Var
    i, s: integer;

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