ПАСКАЛЬ Программа спрашивает пользователя какой-либо вопрос, если отвечает "yes", ему...

Question

ПАСКАЛЬ

Программа спрашивает пользователя какой-либо вопрос, если отвечает "yes", ему выводится одно сообщение, если "no", то другое.

Собсвенно, вопрос в том, как добавить y, n (yes, no) и ввести их в код?
Переменную char знаю, но как её использовать... вот в чем проблема.

Comments

Var- это ввод переменных

---

Можете привести наглядный пример использования в коде?

---

begin

---

writeln ('Вопрос');

---

И вот тут как сделать так, что если человек пишет "y", то на экран выводит соббщение, что ответ верный, если пользователь вводит "n", то на экран выводиться, что ответ не верный

---

end.

Answer 1

Var q:{string}char;
begin
readln(q);
if q = 'yes' then...
if q = 'no' then...
end.