1. Разработать алгоритм, который по введённому номеру месяца выводит название времени года. При написании алгоритма использовать логические операции. При неверном вводе месяца должно выдаваться сообщение об ошибке. Протестировать алгоритм на всех целых числах от 0 до 13.
2. Треугольник задан длинами сторон А, В, С. Разработать схему алгоритма, опре-деляющую, существует ли данный треугольник. Если треугольник существует, то установить значение флага F=1, иначе F=0. Для решения этой задачи использовать сложные логические условия. Протестировать алгоритм для следующих исходных данных: а) A=3, B=4, C=5 б) A=1, B=1, C=1 в) A=0, B=4, C=5 г) A=-3, B=6, C=5 д) A=2, B=1, C=8
3. Разработать схему алгоритма для отыскания max(min(a,b), min(c,d)), не ис-пользуя сложные логические условия и вложенные ветвления. Числа a,b,c,d - целые. Протестировать алгоритм для следующих исходных данных:
а) a=4 b=5 c=6 d=9
б) a=2 b=1 c=6 d=9
в) a=2 b=1 c=8 d=4
г) a=12 b=1 c=6 d=9
4. Точка А задана координатами X,Y. Разработать схему алгоритма, который уста-навливает значение флага F=1, если точка принадлежит заштрихованной области (см. рисунок 4) и значение флага F=0 в противном случае. Вывести значение F. Протести-ровать алгоритм для точек (0,0), (1,0), (1.5,1), (-1,1.5), (-2,-1), (2,-1), (1,-1), (-1,1).
Точка А задана координатами X,Y. Разработать схему алгоритма, который устанавливает значение флага F=1, если точка принадлежит заштрихованной области (см. рисунок 5) и значение флага F=0 в противном случае. Вывести значение F. Протестировать алгоритм для точек (0,0), (1.5,1), (2,1), (1,-1), (-0.5,-0.2), (-2,-1), (-1,-2), (-1,1), (-3, 1).
6. Точка А задана координатами X,Y. Разработать схему алгоритма, который уста-навливает значение флага F=1, если точка принадлежит заштрихованной области (см. рисунок 6) и значение флага F=0 в противном случае. Вывести значение F. Протести-ровать алгоритм для точек (0,0), (2,2), (0.5,0.5), (0.5,-1.5), (-0.5,0.5), (-2,-1),
(-1,-2), (-1,1), (2, 0).
Answers & Comments
var a:integer;begin writeln('Введите номер месяца:'); readln(a); case a of 1:writeln('Январь'); 2:writeln('Февраль'); 3:writeln('Март'); 4:writeln('Апрель'); 5:writeln('Май'); 6:writeln('Июнь'); 7:writeln('Июль'); 8:writeln('Август'); 9:writeln('Сентябрь'); 10:writeln('Октябрь'); 11:writeln('Ноябрь'); 12:writeln('Декабрь'); else writeln('Ошибка'); end;end.