C клавиатуры вводится число x. Если число x=1, - вопрос №139082791 от shishckinayuly 12.06.2021 13:01

Question

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

shishckinayuly · 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)