[noveek]

Всем привет помогите решить проблему чтото я непонимаю ))

Код:

var
c:char;
begin
Writeln(Продолжить y/n);
Readln(c);
if c = 'y' then begin Writeln('Yes');
if c = 'n' then begin Writeln('No');
Writeln(c+c);
end;

Вообщемто проблема в том что когда стоят сразу два условия не работает корректно первое тоесть строчка Writeln(c+c) так и не выполнится если char будет равно 'y' , но при = 'n' все выполняется
можно конечно

Код:

Writeln(Продолжить y/n);
Readln(c);
if c = 'y' then Writeln('Yes');
Writeln(c+c);
if c = 'n' then Writeln('No');
Writeln(c+c);

Админ: пользуемся тегами для оформления кода!

но вместо Writeln(c+c); у меня на самом деле очень длинный код )