Отработка навыков использования операторов ветвления

Написать программу, которая проверяет, является ли четным введенное с клавиатуры число Program M2; Var n:integer; Begin Readln(n); Write(‘число’, n,’-‘); If n mod 2=0 then writeln(‘четное’) else writeln(‘нечетное’); End.
Написать программу, которая запрашивает номер дня недели и выводит название дня недели.   Program M3; Var day: integer; Begin Writeln (‘Введите номер месяца от 1 – 12); Readln(day); Case day of 1: writeln(‘Понедельник’); 2: writeln(‘Вторник’); 3: writeln(‘Среда’); 4: writeln(‘Четверг’); 5: writeln(‘Пятница’); 6: writeln(‘Суббота’); 7: writeln(‘Воскресенье’); else writeln(‘число д.б. от 1 до 7’); end; end.

Операторы повторения

Очень часто приходится повторять определенную часть алгоритма для различных значений аргумента. Для организации таких процессов используется алгоритмы с циклической структурой. На языке программирования – операторы повторения. Они составляются по правилам на основе различных закономерностей. Для выполнения процессов повторения на языке Паскаль предусмотрены три вида операторов цикла: арифметический цикл (параметрический цикл) -FOR,цикл с предусловием – WHILEи цикл с постусловием – REPEAT.