Что делать если в строке readln (x); выводит ошибку: ожидплся оператор? program dialog; uses crt; var x: string; begin clrscr; writeln ('òû ïîåäåøü ëåòîì â èòàëèþ? '); readln (x); if (x='äà') or (x='äà') or (x='äà') then writeln ('îòëè÷íî, ïîåäåì âìåñòå! '); if (x='íåò') or (x='íåò') or (x='íåò') then writeln ('æàëü, ïîåäó îäíà! '); writeln ('òû ïîéäåøü çàâòðà â øêîëó? ') readln (x); if (x='äà') or (x='äà') or (x='äà') then writeln ('à ó íàñ çàâòðà âûõîäíîé! ') if (x='íåò') or (x='íåò') or (x='íåò') then writeln ('êëàññ! ìîæíî çàâòðà ñõîäèòü ïîãóëÿòü! '); readln; end.
writeln ('Òû ïîéäåøü çàâòðà â øêîëó?')
then writeln ('À ó íàñ çàâòðà âûõîäíîé!')