C клавиатуры вводится число x. Если число x=1, экран выводит сообщение красный x=2, то зеленый x=3, то синий (Pascal)

Question

Информатика: C клавиатуры вводится число x. Если число x=1, экран выводит сообщение красный x=2, то зеленый x=3, то синий (Pascal)

111mart111 · Answer

Пример работы: [на фото].

Var X: Integer;

begin

Write('Введите число Х:');

Readln(X);

if X = 1 then Writeln('Красный')

else If X = 2 then Writeln('Зелёный')

else Writeln('Синий');

Readln;

end.

C клавиатуры вводится число x. Если число x=1, экран выводит сообщение "красный" x=2, то "зеленый" x=3, то "синий" (Pascal)