Составление программ циклической структуры, Завал с 3 задачами. Опции

[dimas1k]

Сосбтвенно, такая трабла) до сессии всего 3 дня а мне нужно еще 2 отчета сделать, но вот проблема Turbo Pascal 7.1 не хочет работать на Windows 7 x64,а так не хочется ставить другую ОС ради 1 6 задач, не могли бы вы мне помочь с их решением?



1. Найти сумму нечетных чисел от 1 до n.

2. Даны два целых числа A и B (A < B). Вывести в порядке возрастания все числа, расположенные между A и B (A и B не включать в выводимый диапазон), a также количество N этих чисел.

3. Вычислить произведение 10 множителей 1 x 1/3 x 1/5 x ... x 1/n.


и 2 отчет, если конечно будет не сложно


1. Дан массив из n элементов. Получить элементы, которые находятся между минимальным и максимальным. Решить задачу с использованием процедур.

2. Дана квадратная целочисленная матрица порядка n. Увеличить в два раза все элементы, лежащие выше главной диагонали. Решить задачу с использованием процедур.