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

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

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.

Лови ссылку https DEDTGEFIYG

1Freeware или 2 нет верного ответа

0,25 Кбайт=256 байт=> 0,25 Кбайт> 200 байт
3 байта= 24 бита, т.к 3 байта= 24 бита
2560 битов < 2,5 Кбайта, т.к 2,5 Кбайта= 20000 бит
1000 Кбайт= 1 Мбайт, т.к 1000 Кбайт=1 Мбайт, а 1 Мбайт=1 Мбайт
8192 байта > 8 Кбайт, т.к 8192 байта= 8,192 Кбайта