Информатика, вопрос задал kazmbot , 9 лет назад

Определить количество чисел кратных 5 в последовательности от 10 до 50.
Нужно в паскале написать. Хэлпп!

Ответы на вопрос

Ответил archery
0
var
    i, k: integer;

begin
    for i := 10 to 50 do
        if i mod 5 = 0 then
            k := k + 1;
    writeln(k);
end.
Ответил furs1975
0
прога в приложении
================
Приложения:
Новые вопросы