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