Информатика, опубликовано 2018-08-22 23:21:33 by Гость

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

Ответ оставил Гость

Var
    i, s: integer;

begin
    for i := -999 to -100 do
        if i mod 70 = 0 then
            s := s + i;
    writeln(s);
end.

Не нашли ответа?

Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.