Проверить, является ли число трехзначным, у которого первая цифра равна последней. (В паскале)
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.
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
