В 8 классе в понедельник и пятницу- 5 уроков,во вторник и четверг-6 уроков, а в среду-7 уроков.Введите номер дня недели.Выведите

var a : integer; // a — переменная, отвечающая за номер дня недели.beginwrite (\'Введите номер дня недели: \');readln (a);if (a = 1) or (a = 5) then writeln (\'5\'); // Понедельник и пятница.if (a = 2) or (a = 4) then writeln (\'6\'); // Вторник и четверг.if a = 3 then writeln (\'7\'); // Среда.end.