Разработать алгоритм программы(Паскаль) - Pascal

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

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

Разработать алгоритм программы, которая запрашивает у пользователя номер дня недели и выводит его название или сообщает "Ошибка ввода данных".(Разработка алгоритмов разветвляющейся структуры).

Решение задачи: «Разработать алгоритм программы(Паскаль)»

textual
Листинг программы
uses crt;
var n:Integer;
begin
ClrScr;
Write('Введите номер дня недели: ');
Readln(n);
case n of
1:Writeln('Понедельник');
2:Writeln('Вторник');
3:Writeln('Среда');
4:Writeln('Четверг');
5:Writeln('Пятница');
6:Writeln('Суббота');
7:Writeln('Воскресенье');
else Writeln('Ошибка ввода данных');
end;
Readln;
end.

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

  1. Объявляется переменная n типа Integer
  2. Очищается экран с помощью функции ClrScr
  3. Выводится запрос на ввод номера дня недели с помощью функции Write
  4. Пользователь вводит номер дня недели с помощью функции Readln
  5. Введенное значение сохраняется в переменной n
  6. С помощью оператора case проверяется значение переменной n
  7. Если значение равно 1, то выводится сообщение Понедельник
  8. Если значение равно 2, то выводится сообщение Вторник
  9. Если значение равно 3, то выводится сообщение Среда
  10. Если значение равно 4, то выводится сообщение Четверг
  11. Если значение равно 5, то выводится сообщение Пятница
  12. Если значение равно 6, то выводится сообщение Суббота
  13. Если значение равно 7, то выводится сообщение Воскресенье
  14. Если значение не равно ни одному из вышеперечисленных, то выводится сообщение Ошибка ввода данных
  15. Программа ожидает ввода с помощью функции Readln
  16. Программа завершается
  17. Все операции выполняются в пределах одной функции, а именно Main
  18. Переменная n используется только для вывода сообщения об ошибке
  19. Ввод данных осуществляется с помощью функции Readln
  20. Вывод данных осуществляется с помощью функции Writeln

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

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