Условный оператор - Free Pascal
Формулировка задачи:
Объясните пожалуйста поподробней эту программу,что то я не как не пойму полностью.Если пароль не верный почему она пишет "Стойте!" и зачем эта переменная R. И подскажите как сюда с Pascal 2.6.4 код вставить, у меня не копируется код в pascalе. И вот еще задание A). В программах для часового укажите начало и конец условного оператора(то есть,первый и последний его символ,включая вложенные операторы). Это как? Не пойму что то.
Решение задачи: «Условный оператор»
textual
Листинг программы
Var S,R : String; Begin Writeln ('Пароль?');Readln(S); R:='Стойте!'; If S ='pascal' Then R:='Проходите!'; Writeln(R); Writeln('Нажмите Enter'); Readln End.
Объяснение кода листинга программы
- Объявлены две переменные типа String: S и R.
- Выводится сообщение
Пароль?
, и в переменную S считывается введённый пользователем пароль. - Значение переменной R устанавливается в строку 'Стойте!'.
- Проверяется, равен ли введённый пароль 'pascal'.
- Если условие истинно, то значение переменной R заменяется на 'Проходите!'.
- Выводится значение переменной R.
- Выводится сообщение
Нажмите Enter
, и программа ожидает нажатия пользователем клавиши Enter.
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д