Создайте программу в pascal по обучению перехода дороги на сигнал сфетофора

Question

Информатика

Вена

14 февраля, 04:50

Создайте программу в pascal по обучению перехода дороги на сигнал сфетофора

+1

Ответы (1)

Знаете ответ?

Асафий · Answer 1

program itdxvvd;

var x: String;

begin

writeln ('Введите цвет светофора (красный, желтый, зеленый) ') ;

readln (x) ;

if x='зеленый' then

writeln ('На ', x,' цвет можно переходить')

else

writeln ('На ', x,' цвет нельзя переходить') ;

end.