{ Выберите программу или раздел при помощи графического манипулятора «Мышь» ! } Case User Of
'Задача 81' : Uses zadach81.pas; { Даны целые числа a[1], a[2], a[3]. Получить целочисленную матрицу
b[ij]i, j=1, 2, 3, для которой b[ij]=a[i]-3a[j]. ... }
'Задача 82' : Uses zadach82.pas; { Написать программу определения количества
билетов с 6-значными номерами, у которых сумма первых 3 десятичных цифр равна
сумме 3 последних десятичных цифр. ... }
'Задача 83' : Uses zadach83.pas; { Пусть D - заштрихованная часть плоскости (верхний полукруг радиуса 0.6 с центром в точке O, из которого вырезана правая верхняя четверть круга с тем же центром радиуса 0. ... }
'Задача 84' : Uses zadach84.pas; { Дано натуральное число N. Вычислить произведение первых N сомножителей.
(2/1)*(2/3)*(4/3)*(4/5)/…. ... }
'Задача 85' : Uses zadach85.pas; { Дано натуральное n. Сколько различных цифр встречается в его десятичной
записи? ... }
'Задача 86' : Uses zadach86.pas; { Даны действительные числа x[1], x[2],...,
x[17]. Найти сумму значений | x[i] - x[j] | при условии, что 1 <= i < j
<= 17. ... }
'Задача 88' : Uses zadach88.pas; { m и n - натуральные числа, m<=n. Найти
среднее арифметическое чисел a[1],... , a[m-1], a[m+1],... , a[n] (всех, кроме
a[m]). ... }
'Задача 89' : Uses zadach89.pas; { Написать программу, которая находит и
выводит на печать все четырехзначные числа abcd, для которых выполняются
следующие условия:
1) a, b, c, d - разные цифры
__ __
2) ab ... }
'Задача 9' : Uses z_time7.pas; { Известно время, за которое две трубы наполняют бассейн, и время, за которое этот же бассейн наполняет первая труба.
Определить время, за которое вторая труба наполнит бас ... }
'Задача 90' : Uses zadach90.pas; { n - натуральное, a[1], a[2],..., a[n] -
целые. Заменить все большие 7 члены последовательности числом 7. Найти
количество таких членов. ... }
'Задача 91' : Uses zadach91.pas; { Найти все простые делители натурального
числа n. ... }
'Задача 92' : Uses zadach92.pas; { В таблице a[1:100] записаны нули и
единицы. Заменить 0 на 1, а 1 на 0. ... }
'Задача 93' : Uses zadach93.pas; { Дана целочисленная таблица A[1:1000].
Подсчитайте наибольшее число идущих в ней подряд одинаковых элементов. ... }
'Задача 94' : Uses zadach94.pas; { Даны вещественные числа a[1],..., a[n].
Известно, что среди них есть отрицательные. Пусть первый среди отрицательных
членов имеет номер a[k+1]. Вычислить a[1] + +2*a[2]+ ... }
'Задача 95' : Uses zadach95.pas; { На избирательном участке в списке из 100
избирателей указываются фамилия и название улицы, на которой проживает
избиратель. Определить, сколько избирателей живет на улице ... }
'Задача 96' : Uses zadach96.pas; { Написать программу, которая по заданным
трем числам определяет, является ли сумма каких-нибудь двух из них
положительной. ... }
'Задача 97' : Uses zadach97.pas; { Написать программу, которая находит и
выводит на печать все четырехзначные числа abcd, для которых выполняются
следующие условия:
1) a, b, c, d - разные цифры
2) ab-cd=a+ ... }
'Задача 98' : Uses zadach98.pas; { Сообщество роботов живет по следующим
законам: - один раз в начале года они объединяются в группы по три или пять
роботов;
- за год группа из 3 роботов собирает 5
новых, ... }
'Задача 99' : Uses zadach99.pas; { Определить лежит ли точка а на прямой y=kx+l ... }
'Задача25' : Uses zadach25.pas; { Поменять местами элементы k и h ... }