Question

Найти количество двухзначных натуральных чисел у которых первая цифра 5. Написать программу на языке ПАСКАЛЬ

Answer 1

var i, count: integer;

begin

   count:= 0;

   for i:=10 to 99 do

       if i mod 10 = 0 then count = count + 1;

   writeln(count);

end.