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