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

Var i, k: integer;begin for i := 10 to 50 do if i mod 5 = 0 then k := k + 1; writeln(k);end.