Условный оператор - 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.

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

  1. Объявлены две переменные типа String: S и R.
  2. Выводится сообщение Пароль?, и в переменную S считывается введённый пользователем пароль.
  3. Значение переменной R устанавливается в строку 'Стойте!'.
  4. Проверяется, равен ли введённый пароль 'pascal'.
  5. Если условие истинно, то значение переменной R заменяется на 'Проходите!'.
  6. Выводится значение переменной R.
  7. Выводится сообщение Нажмите Enter, и программа ожидает нажатия пользователем клавиши Enter.

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

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

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