Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Pascal.DOC
Скачиваний:
23
Добавлен:
21.03.2015
Размер:
1.77 Mб
Скачать

Практическое задание n 1. 18

1. Вывести на экран таблицу с колонкой "Фамилии" и тремя колоноками "оценки" по различным предметам и заполнить ее 10 строками данных. Значения элементов массива фамилий задаются в программе оператором присваивания, значения элементов массивов оценок задаются функцией Random.

2. Рассчитать общий средний балл десяти учащихся по одному предмету. Составить список фамилий учащихся с оценками, превышающими средний балл. Программа запрашивает ввод с клавиатуры фамилий и оценок учащихся и выводит на экран исходную таблицу: Фамилия - оценка, а также средний балл и таблицу учащихся с оценками, превышающими средний балл.

Практическое задание n 1. 19

1. Рассчитать наибольшее и наименьшее значения функции y= sin(x) - x2 на интервале 0 =< x <= 1, изменяя значение "х" с шагом 0. 005. Вывести на экран таблицу значений "х" и "у" в три пары колонок, а также наибольшее и наименьшее значения функции "у" и соответствующие им значения "х".

2. Рассчитать наибольшее и наименьшее значения функции y= cos(x) + x на интервале 0 =< x <= Pi/2, разбив интервал на 99 отрезков. Вывести на экран таблицу значений "х" и "у" в две пары колонок, а также наибольшее и наименьшее значения функции "у" и соответствующие им значения "х".

Практическое задание n 1. 20

1. Рассчитать момент инерции массива точек относительно осей "x" и "y" :

Jx = m1 * x12 + m2 * x22 +. . . + mN * xN2,

Jy = m1 * y12 + m2 * y22 +. . . + mN * xN2.

Массив "N" точек ( N = 60 ), имеющих массы "m" ( 5 =< m <= 25 ) определен на прямоугольнике с координатами -10 <= x <= 10 и 10 <= y <= 20. Вывести на экран таблицу значений "N", "х", "у", "m", а также моменты инерции "Jx", "Jy".

Определить и вывести на экран номера точек с экстремальными значениями координат, массы и моментов инерции точки.

2. Расcчитать координаты центра тяжести массива точек: Xc = Xm/M, Yc = Ym/M, где

Xm = m1 * x1 + m2 * x2 +. . . + mN * xN,

Ym = m1 * y1 + m2 * y2 +. . . + mN * yN,

M = m1 + m2 +. . . + mN,

Массив из "N" точек ( N = 45 ), имеющих массы "m" (3 =< m <= 35) определен на прямоугольнике с координатами -22 <= x <= 33 и 11 <= y <= 44. Вывести на экран таблицу значений "N", "х", "у", "m", а также координаты центра тяжести "Xc", "Yc" и массу точек "M". Определить и вывести на экран номера точек с экстремальными значениями координат и массы.

42

3. Рассчитать массив "r" - расстояние между точками с соседними номерами и массива "s"- расстояние от каждой точки до последней вдоль ломанной, например:

r1 = ((x1 - x2)2 + (y1 - y2)2) - расстояние от точки "1" до точки "2",

s1 = r1 + r2 + ... + rN - расстояние от точки "1" до последней точки "N",

s2 = s1 - r1 - расстояние от точки "2" до последней вдоль ломанной.

Массив из "N" точек ( N = 30 ) определен на прямоугольнике

с координатами 9<=x<=25 и 21<=y<=34. Вывести на

экран таблицу значений "N", "х", "у", "s".

4. Рассчитать массив "s"- сумма расстояний от каждой точки до всех остальных, по формулам: 6

7 2

rij = ((xi-xj)2+(yi-yj)2) - расстояние от i- ой 1

до j- ой точки, 3

4

si = si + rij 5

- суммирование производится во внутреннем цикле с параметром "j", а во внешнем цикле меняется параметр "i".

Массив из "N" точек ( N = 20 ) определен на прямоугольнике с координатами 3<=x<=15 и 8<=y<=14. Вывести на экран таблицу значений "N", "х", "у", "s".

5. К задаче п3. Определить массив "M" - номеров точек , которые придут к финишу быстрее первой, т. е. для которых выполняется условие: T[i] < T[1].

Здесь T[i] = S[i] / V[i] - время движения от i-ой точки до последней,

V[i] = 30 - i - скорость движения i-ой точки. Вывести на экран таблицу значений "N", "х", "у", "S", "V", "t" для всех точек и таблицу для "быстрых" точек.

6. К задаче п4. Определить массив номеров точек "M", которые ходят в гости к другим точкам дольше первой, т. е. для которых выполняется условие: S[i]>S[1] (точки каждый раз возвращаются в исходное положение (домой), скорость всех точек постоянна и одинакова). Вывести на экран таблицу значений "N", "х", "у", "s", для всех точек и таблицу для "медленных" точек.

Примечание к п.п. 1-6: Значения "x", "y", "m" задаются функцией Random.

Соседние файлы в предмете [НЕСОРТИРОВАННОЕ]