Проверить, является ли число трехзначным, у которого первая цифра равна последне

Проверить, является ли число трехзначным, у которого первая цифра равна последней. (В паскале)
Гость
Ответ(ы) на вопрос:
Гость
var   i,cnt:integer; begin   cnt:=0;   for i:=100 to 999 do   begin     if ((i div 100)=(i mod 10)) then inc(cnt);   end;   writeln(cnt);   readln; end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы