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

Question

Информатика

Эллочка

18 августа, 00:33

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

+3

Ответы (1)

Знаете ответ на вопрос?

Мавра · Answer 1

program itdxvvd;

var x: String;

begin

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

readln (x) ;

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

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

else

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

end.