Пусть правильный ответ 5
Var a:integer;
Begin
A:=0;
While a<>5 do Readln(a)
<Остальная часть программы>
76 символов. Считая пробелы. Это тоже символы
Вместо вир поставить фок
вместо курс поставить танц
вместо б поставить д
вместо к поставить ф
Я любитель природы, и правда,там столько красок,тепла.Вот был один случай: я гуляла во дворе и поссорились с подругой,был солнечный день.Ну и ладно-подумала я,-захочет, сама извинится. Но вот началась гроза,я её не боюсь в моя подруга боится.Моя подруга ломала цветы но я была не такая,я была против.Но вот с моей подругой что-то случилось, она стала беречь природу. Любить её.Но внезапно на моей голове очутился красивый венок из ромашек. Я всё поняла. Природа;как Бог все видит,мою подругу одарила она любить её,а мне,за мой оберег к ней она подарила красивый венок из ромашек! вообщем могу сказать,кто природу не тревожит тому она вот и поможет.
Фоксфорд, да? ответ ВВ54, а вообще, открываешь таблицу и считаешь.