Процедура с переменной булева типа и условный оператор - PascalABC.NET

Узнай цену своей работы

Формулировка задачи:

Исправьте на ошибки
Я изменил код. На девятой строке пишет : "Неизвестное имя msg'.

Решение задачи: «Процедура с переменной булева типа и условный оператор»

textual
Листинг программы
var man : integer;
    msg:boolean;
begin 
writeln ('Если 1, то по-русски, если нет, то по-английски'); readln (man);
if man=1 then msg:=true else msg:=false;
if msg then writeln ('Нажмите Enter') else writeln ('Press Enter');
end.

Объяснение кода листинга программы

  1. Объявлены две переменные: man типа integer и msg типа boolean.
  2. Выводится сообщение с предложением выбрать язык ввода (1 - русский, 2 - английский).
  3. Происходит чтение значения переменной man.
  4. Переменная msg инициализируется в зависимости от значения переменной man. Если man равно 1, то msg становится true, иначе msg становится false.
  5. Выводится сообщение для подтверждения ввода. Если msg равно true, то выводится Нажмите Enter, иначе выводится Press Enter.

Оцени полезность:

15   голосов , оценка 4 из 5
Похожие ответы