Человек-компьютер
учитель-ученик
Var x, l: integer;
begin
readln(x);
l := Trunc(Log10(Abs(x)));
if l = 2 then
writeln (x)
else
writeln('число не трехзначное');
<span>end.</span>
Это URL - Uniform Resource Locator (или <span>Universal Resource Locator)</span>
Ну, pdf влазит, 4000 байт = 4кб
У лукоморья дуб зеленый;
Златая цепь на дубе том:
И днем и ночью кот ученый
Все ходит по цепи кругом:
Идет направо – песнь заводит,
Налево - сказку говорит,
Там чудеса: там леший бродит,
Русалка на ветвях сидит…
(А. С. Пушкин)