Условный оператор - Free Pascal

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

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

Объясните пожалуйста поподробней эту программу,что то я не как не пойму полностью.Если пароль не верный почему она пишет "Стойте!" и зачем эта переменная R. И подскажите как сюда с Pascal 2.6.4 код вставить, у меня не копируется код в pascalе. И вот еще задание A). В программах для часового укажите начало и конец условного оператора(то есть,первый и последний его символ,включая вложенные операторы). Это как? Не пойму что то.

Решение задачи: «Условный оператор»

textual
Листинг программы
  1. Var S,R : String;
  2. Begin
  3. Writeln ('Пароль?');Readln(S);
  4. R:='Стойте!';
  5. If S ='pascal'
  6. Then R:='Проходите!';
  7. Writeln(R);
  8. Writeln('Нажмите Enter'); Readln
  9. End.

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

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

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


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

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

15   голосов , оценка 4 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Бесплатно
Оформите заказ и авторы начнут откликаться уже через 10 минут
Похожие ответы