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

Лидуня270516 Лидуня270516    1   29.07.2019 15:40    0

Ответы
Мышка007 Мышка007  27.09.2020 13:22
Var
    i, k: integer;

begin
    for i := 10 to 50 do
        if i mod 5 = 0 then
            k := k + 1;
    writeln(k);
end.
ПОКАЗАТЬ ОТВЕТЫ
nastiarabadj nastiarabadj  27.09.2020 13:22
Прога в приложении
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика