Пример 7

Ввести первую букву времени года и вывести соответствующее название времени года на русском языке.

Решение:

Program pr7;

Var N: char;

Begin writeln ('введи первую букву времени года ');

Readln (N);

Case N of

'з': writeln ('зима');

'в': writeln ('весна');

'л': writeln('лето');

'о': writeln('осень')

end.

Результат:

введи первую букву времени года о

осень

ЗАДАНИЯ

1. Вводятся координаты точки. Определить попадает ли точка в заштрихованную область или нет.

	б)

а)

	г)

в)

д) е)

		з)

y

y

y

ж)

и) к)

			x

2. Введено трехзначное число. Найти сумму четных цифр.

3. Введено четырехзначное число. Содержится ли в записи этого числа цифра 7?

4. Введено четырехзначное число. Найти среднее арифметическое нечетных цифр.

5. Введено трехзначное число. Если в записи числа встречается цифра 5, то записать число в зеркальном отображении.

6. Введено трехзначное число. Если сумма его цифр нечетна, то увеличить число вдвое.

7. Введено четырехзначное число. Найти сумму цифр, кратных 3-м.

8. Вводятся Х и Y. Если хотя бы одно из этих чисел положительно, то найти их произведение. Иначе – найти их сумму.

9. Вводятся Х и Y. Если Х больше Y, то произвести их обмен.

10. Из чисел A, B, C, D выбрать максимальное.

11. Даны три действительных числа. Возвести в квадрат те из них, значения которых неотрицательны.

12. Даны два числа А и B. Выяснить, делиться ли A на B.

13. Вводится число. Если оно положительное, то уменьшить его в 10 раз.

14. Вводятся X и Y. Заменить большее из этих чисел разностью большего и меньшего.

15. Определить, принадлежит ли введенное Х интервалу (-10, 15)?

16. Вводится натуральное Х. если оно четное, то уменьшить его вдвое, если нечетное – увеличить на 10.

17. Вводятся X и Y. Заменить меньшее из них суммой этих чисел.

18. Из чисел A, B, C, D выбрать минимальное.

19. Определить, сколько среди заданных чисел A, B, C, D отрицательных.

20. Сколько среди заданных чисел A, B, C, D нечетных.

21. Сколько среди заданных чисел A, B, C, D четных.

22. Составить программу, которая выводит меню и выполняет указанные действия с заданными целыми числами:

1 - сумма двух чисел

2 - разность двух чисел

3 - конец работы

23. Составить программу, которая по введенной начальной букве выводит название цветов радуги (красный, оранжевый, желтый, зеленый, голубой, синий, фиолетовый).

24. Составить программу, которая выводит меню и при нажатии нужной цифры вычисляет соответствующее выражение:

1 - y= x³ + x

2 - y= (x +1)²

3 - y=

25. Составить программу, которая по введенному порядковому номеру выводит название дня недели.

26. Составить программу, которая позволяет ввести номер месяца и вывести его название.

27. Составить программу, которая выводит меню и при нажатии вводе цифры вычисляет соответствующее выражение:

1 - y= (a+b)²

2 - y= a²-b²

3 - y= 1/(a+b)

28. Составить программу, которая выводит меню и при вводе буквы вычисляет соответствующую функцию:

Т - Tg x

S - Sin x