Практические задания на составление программ с массивами.

Практические задания по составлению программ с простыми типами данных.

 

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

  1. Запросить стоимость 3-х блюд в столовой и дату. Вывести на экран текст о стоимости обеда на заданную дату. Указать дату в тексте.
  2. Вводить с клавиатуры 50 штук букв – по одной. Сосчитать количество букв_«А».
  3. Вывести на экран все числа кратные 7 из первой сотни натуральных чисел.
  4. Напечатать таблицу районного коэффициента в 15% при выдаче заработной
  5. платы с суммы от 1000 руб. до_ 5000 руб. через 500 руб.
  6. Рассчитать величину

sin x2, если x > 0

Y= sin2 x, если –1 <= x <= 0

|x|, если x > -1

  1. Вывести на экран строкой четные числа из первой сотни натуральных чисел.

8. Ввести номер дня недели, вывести название дня недели. Используйте CASE. Предусмотреть вероятность некорректного ввода со стороны пользователя.

9. Рассчитать y по формуле y = 1 + x на интервале [-4,4] с шагом = 1

х-3

  1. Протабулировать функцию y = sin2 x на интервале [-П/2; П/2] c шагом П/4
  2. Заполнить структуру типа «запись», состоящую из полей: фамилия, группа, средний балл успеваемости. Вывести запись на экран строкой в том случае, если средний балл > 3.
  3. Вводить с клавиатуры 50 штук букв – по одной. Сосчитать количество букв_«А».

13. Протабулировать функцию y = 2x на интервале [-3;3] с шагом 1.

14. Ввести 3 числа. Выбрать среди них большее и если оно отрицательное, вывести его с особым сообщением и со сменой знака. Если положительное -обычное сообщение.

15. Протабулировать функцию y = |x2-1| на интервале [-5;5] с шагом 0,5 . Вывести заголовки.

16.

i2+1 i=1 i
Рассчитать

Y=

 

  1. Рассчитать y по формуле 1

y = x2-1, если x <= 0

x, если x > 0

Учесть случай, когда нет решений.

  1. В программе вычислить sin(x-2), если x > 2

Y= 3x, если x < 1

2-x, если 1<=x<=2

 

  1. Из первых 50-ти натуральных чисел выбрать числа кратные трем и найти их произведение.

20. Запросить с клавиатуры знак действия и два числа. Выполнить действие и вывести его результат.

21. Ввести с клавиатуры слово неизвестной длины ( до 30). Вывести это слово, вставляя пробел после каждого символа.

22. Запросить номер месяца года и вывести время года. Использовать CASE. Предусмотреть случай ввода ошибочного номера месяца.

23. Ввести число, означающее количество денег в рублях. Вывести это число, подписать к нему соответствующее обозначение (рубль, рубля, рублей). Использовать команду CASE.

 

Практические задания на составление программ с массивами.

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

1. В массиве из 20-ти чисел рассчитать количество чисел кратных десяти. Вывести на экран массив и эти числа отдельно.

2. Найти произведение всех элементов массива, исключая нули. Вывести массив и произведение на экран

3. Ввести и вывести массив целых чисел. В массиве найти количество чисел больше заданного. Вывести номера этих чисел.

4. В массиве из 20 действительных чисел найти количество положительных чисел и нулей по отдельности. Вывести на экран массив и рассчитанные результаты.

5. В массиве из 30-ти чисел дается температура на каждый день месяца. Вывести на экран значения температур за все дни месяца, определить среднюю отрицательную температуру.

6. В одномерном массиве сосчитать сумму элементов, стоящих на четных позициях. Вывести сам массив и рассчитанную сумму.

7. Заполнить массив числами. Вывести массив на экран. Сосчитать сумму элементов, начиная с заданного номера.

8. В одномерном массиве сосчитать сумму элементов, стоящих на каждой 3-ей позиции.

9. В массиве перемножить элементы с нечётными номерами, исключая нули. Вывести массив и результат перемножения.­­­­­­­­­­­­­­­­­­­­­­

10. В массиве TEM [1..31] – каждое число это температура воздуха днём. Найти среднюю температуру в воскресные дни (каждый 7 день).

11. Дан массив из 10 вещественных чисел, среди которых есть отрицательные элементы, найти номер первого отрицательного элемента.

12. Ввести двумерный массив и вывести его по строкам. Ниже вывести столбиком числа, стоящие на главной диагонали.