Напишите программу на Паскале, в которой выдается количество двузначных чисел, не кратных 5

Question

Даня

8 октября, 20:07

+5

Ответы (1)

Знаете ответ на вопрос?

Зинаха · Answer 1

Begin

writeln (72) ;

end.

Шучу, на самом деле вот так:

var i, c:byte;

begin

for i:=10 to 99 do if i mod 5>0 then c+=1;

writeln (c) ;

end.