Это невозможно. Т.К в большинстве кодировок нужно минимум 8 бит на символ
Program n_1;
var r, d:integer;
begin
r:=2; d:=r*2;
writeln('Диаметр круга равен ',d);
end.
Если нажать на зеленый флаг, то машина будет двигаться, пока не "наедет" на белый цвет, не знаю, что значит "спрятаться", но в любом случае скрипт остановится.
Буква "ш" + нарисованная бутылка "кола"
или слово
шоколад
а под ним цифры 2 и 7 зачеркнутые