Создайте программу, которая выполняет следующие действия: 1. Определите 8 целочисленных переменных. Назначьте этим переменным случайные числа из следующих диапазонов и выведите их на экран:
· От 0 до 15
· От 3 до 10
· От -8 до 2
· От 25 до 50
· От -17 до 22
2. Определите 1 целочисленную переменную. Назначьте начальное значение 10. Используйте процедуры INC и DEC, чтобы изменить значение переменной на следующее: 5, 3, 9, 8, 15, 0, 3, 6. После каждого изменения отображайте значение переменной на экране.
3. Решение квадратных уравнений. Требовать, чтобы клавиатура вводила параметры a, b и c. Вычислить квадратное уравнение
аХ2 + ЬХ + с = 0
корни X1 и X2 и выводим их на экран.
4. Рассчитайте и отобразите на экране значения синуса для следующих углов: 10˚, 30˚, 50˚, 70˚ и 90˚.
5. Требовать, чтобы клавиатура ввела 3 целых числа (коды символов). Выведите на экран символы, соответствующие введенным кодам. Например: при вводе кода 65 на клавиатуре программа должна вывести символ A
6. Выведите на экран квадратные корни из 5 случайных чисел. Диапазон номеров от 1 до 150.
7. Вычислите следующее уравнение и выведите результат на экран:
R = a4 + b3 - c2, где a, b и c - целые числа, вводимые с клавиатуры.
8. Вычислите следующее уравнение и выведите результат на экран:
- x и z - целые числа, вводимые с клавиатуры, y - результат уравнения.
9. Усовершенствовать Задачу 8 - в случае, если введенное значение x меньше -3, вывести утверждение «Вычисления невозможны» и не выполнять вычисления по уравнениям.
10. * Требуется ввести 2 целых числа. Отображение случайного числа в диапазоне от первого введенного до второго введенного числа.
Например, если вы вводите числа 5 и 10, вы должны вывести случайное число в диапазоне от 5 до 10.
паскаль
а) в системе 20 элементов и она допускает разбиение на 5 подсистем по 4 элемента в каждой;
Всего связей 20·19 = 380.
При разбиении на 5 подсистем по 4 элемента в каждой:
Число связей между подсистемами 5·4 = 20, число связей внутри каждой подсистемы – 4·3 = 12. Всего 20 + 5·12 = 80 связей
б) в системе 100 элементов и она допускает разбиение на 10 подсистем по 10 элементов в каждой.
Всего связей 100·199 = 19900.
При разбиении на 10 подсистем по 10 элементов в каждой:
Число связей между подсистемами 10·9 = 90, число связей внутри каждой подсистемы – 10·9 = 90. Всего 90 + 10·90 = 990 связей
Если что, отправляйте на исправление. дома дорисую.
Главное программа работает. Правда есть подозрения, что не во всех Паскалях (как они относятся к объявлению массива массивов?)
Это был Free Pascal Compiler version 2.6.4 [2014/04/20] for i386
В версии 3.0.0. думаю, тоже сработает
P.S.Добавил возможные варианты (не все, ясное дело) расположения точек.