Задача 3 Урок 12.1

Primary tabs

Submitted by jl8qy9kd_pro on Thu, 07/22/2021 - 15:46

Forums:

http://fkn.ktu10.com/?q=node/8674

Пользователь вводит в консоль символы (после каждого нажимая Enter), в ответ выводите символ '&', до тех пор пока пользователь не введёт '#', после чего завершите программу.

var   i: Char;
begin
  repeat
   writeln('vvedi SIMVOL');
   readln(i);
   if(i <> '#') then
     writeln('&',' ')
  until(i = '#');
  readln();
end.
  • Log in to post comments
  • 781 reads
vedro-compota's picture

vedro-compota

Sun, 07/25/2021 - 14:13

решение засчитано

_____________
матфак вгу и остальная классика =)