1) Составьте прграмму,в которой определялось бы является ли введеный символ гласной или согласной буквой латинского алфавита. 2) Составьтепрограмму-меню,выводящую расписание уроков в 1 из 3-ёх дней недели. 3) Напишите программу,которая анализирует человека по возрасту и относит к одной из четырёх групп: дошкольник,ученик,работник,пенсионер. *Паскаль. Заранее спасибо*
2) var i:integer; begin writeln('Введите цифру означающюю день недели, например 2-вторник'); readln(i); case i of 1:writeln('Понедельник: Алгебра,Геометрия,Русский,Физ-ра'); 2:writeln('Вторник Информатика,История,Изо'); 3:writeln('Среда,Английский,Искусство'); else writeln('ERROR'); readln; end; 3) var a:integer; begin writeln('Введите ваш возраст'); readln(a); if (a<7) then writeln('Дошкольник') else if (a>7) and (a<18) writeln('Ученик') else if (a>18) and (a<60) writeln('Рабтник') else if (a>65) writeln('Пенсионер'); readln; end.