Иллюстрированный самоучитель по Turbo Pascal для начинающих

Циклы. For.

114. Написать программу, которая генерирует три последовательности из десяти случайных чисел в диапазоне от 1 до 10, выводит каждую последовательность на экран и вычисляет среднее арифметическое каждой последовательности. Рекомендуемый вид экрана во время работы программы приведен ниже.

*** Случайные числа ***
6 10 4 2 5 8 1 7 7 3 сред, арифм. 5.30
10 3 6 1 10 1 3 8 7 6 сред, арифм. 5.50
5 2 2 5 4 2 2 1 6 10 сред, арифм. 3.90
Для завершения работы нажмите Enter

115. Написать программу, которая выводит на экран таблицу стоимости, например, яблок в диапазоне от 100 г до 1 кг с шагом 100. Ниже представлен рекомендуемый вид экрана программы во время ее работы.

Введите цену одного килограмма и нажмите Enter (копейки от рублей отделяйте точкой)
 › 16.50
Вес (гр) Cтоимость (руб.)
100 1.65
200 3.30
300 4.95
400 6.60
500 8.25
600 9.90
700 11.55
800 13.20
900 14.85
1000 16.50

116. Написать программу, которая выводит таблицу значений функции у = |х|. Диапазон изменения аргумента – от -4 до 4, шаг приращения аргумента – 0.5.

117. Написать программу, которая выводит таблицу значений функции у =Iх + 2|. Диапазон изменения аргумента – от -4 до 4, шаг приращения аргумента – 0.5.

118. Написать программу, которая выводит таблицу значений функции у = |х – 2I+ Iх + 1|. Диапазон изменения аргумента – от -4 до 4, шаг приращения аргумента – 0.5.

119. Написать программу, которая выводит на экран таблицу умножения, например, на 7. Рекомендуемый вид экрана во время работы программы приведен ниже.

7 X 2= 14
7 X 3 = 21
7 X 4 = 23
7 X 5 = 35
7 X 6 = 42
7 X 7 = 49
7 X 8 = 56
7 X 9 = 63

120. Написать программу, которая выводит двоичное представление введенного с клавиатуры десятичного целого числа в диапазоне от 0 до 255. Рекомендуемый вид экрана во время работы программы приведен ниже (данные, введенные пользователем, выделены полужирным шрифтом).

Преобразование десятичного числа в двоичное.
Введите целое число от 0 до 255 и нажмите Enter
 › 164
Десятичному числу 64 соответствует двоичное 10100100
Для завершения работы программы нажмите Enter.

121. Написать программу, которая выводит на экран квадрат Пифагора – таблицу умножения. Рекомендуемый вид экрана во время работы программы приведен ниже.

1 2 3 4 5 6 7 8 9 10
1 1 2 3 4 5 6 7 8 9 10
2 2 4 6 8 10 12 14 16 18 20
3 3 6 9 12 15 18 21 24 27 30
4 4 8 12 16 20 24 28 32 36 40
5 5 10 15 20 25 30 35 40 45 50
6 6 12 18 24 30 36 42 48 54 60
7 7 14 21 28 35 42 49 56 63 70
8 8 16 24 32 40 48 56 64 72 80
Если Вы заметили ошибку, выделите, пожалуйста, необходимый текст и нажмите CTRL + Enter, чтобы сообщить об этом редактору.