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

0 голосов
78 просмотров
Проверить, является ли число трехзначным, у которого первая цифра равна последней.(В паскале)

Информатика (70 баллов) | 78 просмотров
0
Дано ответов: 2
0 голосов
Правильный ответ

Var n:string;k,i:integer;beginreadln(n);k:=length(n);if k=3 then writeln('yes') else writeln('no');end.

(146 баллов)
0

всё правильно. спасибо

0 голосов
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.
(26 баллов)
0

чё то у тебя не то. не правильно. цифру 90 выводит в начале и ничего не определяет