Урок 12.1 Задача 5
Primary tabs
Пользователь вводит в консоль символы (после каждого нажимая Enter), в ответ выводите символ '&', до тех пор пока пользователь не введёт '#', после чего завершите программу (не выводя ничего в ответ).
var a: char; begin repeat writeln('vvedite simvol : '); readln(a); if a<>'#' then writeln('&'); until a='#'; writeln('<<<Konec>>>!'); readln(); end.
- Log in to post comments
- 180 reads