Еще 3D принтеров...
ну а так всё ограничивается только фантазией, знанием и законом
20Кбайт *1024*8 = 163840 бит
Если 1 символ занимает 8 бит, то
163840 бит / 40 строк / 64 символа / 8 бит = 8 страниц
Var
x: real;
begin
readln(x);
write('y = ');
if (x < -7) then write(7)
else if (x < 0) then write(-x)
else if (x <= 5) then writeln(x)
else write(5);
<span>end.</span>