Практикум по программированию на языке Turbo Pascal. Часть 1. Портнягина В.В - 78 стр.

UptoLike

Вводите после стрелки числа. Для завершения ввода введите ноль:
– >
45
– >
23
– >
15
– >
0
Введено чисел: 3
Сумма чисел: 83
Среднее арифметическое: 27,67
Вариант 13
1. Написать программу, которая генерирует десять случайных чисел в
диапазоне от 1 до 10, выводит эти числа на экран и вычисляет их среднее
арифметическое. Рекомендуемый вид экрана во время работы программы
приведен ниже.
Случайные числа
1 3 4 2 7 4 9 6 2 1
Среднее арифметическое: 3,9
2.
В ЭВМ по очереди вводятся координаты n точек. Определить, сколь-
ко из них принадлежат фигуре, ограниченной осью абсцисс и аркой синусои-
ды, построенной для аргумента от 0 до π.
Указания к решению задачи 2
Для каждой точки нужно проверять ограничение на Х (0 Х π.) и на
Y (0 Y SinX).
3. Стоимость доставки груза самолетом составляет 2 500 руб. за м
3
объ-
ема груза. Написать программу, которая выводит стоимость доставки каждо-
го из пяти ящиков, размеры которых приведены ниже. Найти общую стои-
мость груза.
Длина, м Ширина, м Высота, м
4 2 3
6 2 2
4 2,5 2,5
3 3 3
4 2 6
Вариант 14
1. Написать программу, которая выводит таблицу значений функции
у = |х + 2| + sinx. Диапазон изменения аргументаот –4 до 4, шаг приращения
аргумента равен 1. Вид экрана такой, как в варианте 9 (задача 1).
2.
Пусть дано семь целых чисел, которые вводятся по одному. Получить
сумму тех из них, которые меньше по абсолютному значению квадрата по-
рядкового номера вводимого числа.
78
    Вводите после стрелки числа. Для завершения ввода введите ноль:
    – > 45
    – > 23
    – > 15
    –>0
    Введено чисел: 3
    Сумма чисел: 83
    Среднее арифметическое: 27,67

    Вариант 13
    1. Написать программу, которая генерирует десять случайных чисел в
диапазоне от 1 до 10, выводит эти числа на экран и вычисляет их среднее
арифметическое. Рекомендуемый вид экрана во время работы программы
приведен ниже.
    Случайные числа
    1342749621
    Среднее арифметическое: 3,9

     2. В ЭВМ по очереди вводятся координаты n точек. Определить, сколь-
ко из них принадлежат фигуре, ограниченной осью абсцисс и аркой синусои-
ды, построенной для аргумента от 0 до π.

     Указания к решению задачи 2
     Для каждой точки нужно проверять ограничение на Х (0 ≤ Х ≤ π.) и на
Y (0 ≤ Y ≤ SinX).

    3. Стоимость доставки груза самолетом составляет 2 500 руб. за м3 объ-
ема груза. Написать программу, которая выводит стоимость доставки каждо-
го из пяти ящиков, размеры которых приведены ниже. Найти общую стои-
мость груза.

         Длина, м                 Ширина, м                  Высота, м
            4                        2                          3
            6                        2                          2
            4                       2,5                        2,5
            3                        3                          3
            4                        2                          6

      Вариант 14
      1. Написать программу, которая выводит таблицу значений функции
у = |х + 2| + sinx. Диапазон изменения аргумента – от –4 до 4, шаг приращения
аргумента равен 1. Вид экрана такой, как в варианте 9 (задача 1).

    2. Пусть дано семь целых чисел, которые вводятся по одному. Получить
сумму тех из них, которые меньше по абсолютному значению квадрата по-
рядкового номера вводимого числа.
                                   78