Составьте программу вычисления суммы всех отрицательных трехзначных чисел, кратных 70

arifmametov1 arifmametov1    2   30.07.2019 01:00    0

Ответы
dddddkkke dddddkkke  19.08.2020 19:52
Var
    i, s: integer;

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