|
PROGRAM6380.PAS |
|
{* Задачи *}{ Выберите программу или раздел при помощи графического манипулятора «Мышь» ! }Case User Of- 'Задач 242' : Uses zadach242.pas; { Даны натуральное число n, символы S,…., S. Будем рассматривать слова, образованные символами, входящими последовательность S,….., S, считая при этом, что количество симво ... }
- 'Задача 1' : Uses baza0.pas; { Нефтебаза отпустила за два дня 2560 л. бензина. Во второй день база отпустила на 280 л. больше. Сколько литров бензина база отпустила отдельно за каждый день? ... }
- 'Задача 10' : Uses zadach10.pas; { Месячная выплата m по займу в s рублей на n лет под процент p по формуле:
m = (s * r * (1 + r)n) / (12 * ((1 + r)n – 1)), где r = p / 100. ... }
- 'Задача 100' : Uses zadach100.pas; {
Составить
программу для определения лежит ли точка (x3;y3), на прямой проходящей через точки
(x1;y1), C(x2;y2) ... }
- 'Задача 101' : Uses zadach101.pas; {
Составить
программу для определения расстояния от точки (x3;y3) до прямой проходящей через точки
(x1;y1),(x2;y2) ... }
- 'Задача 103' : Uses zadach103.pas; { Даны координаты диагонали прямоугольника. Найти его площадь. ... }
- 'Задача 104' : Uses zadach104.pas; { Даны числа a, b, c. Составить программу вычисления (min(a, c)-min(a, b)/(5+min(b, c)) ... }
- 'Задача 105' : Uses zadach105.pas; { Цифры числа хранятся в таблице b. b[1] содержит цифру высшего разряда a=a, a2, a3...an. Найти число. ... }
- 'Задача 106' : Uses zadach106.pas; { Найти наименьшее однозначное число х удолв условию x*x*x-x*x=n. ... }
- 'Задача 107' : Uses zadach107.pas; { Найти двузначное число сумма кубов цифр которого равна n. ... }
- 'Задача 108' : Uses zadach108.pas; { Заданы 2 точки. Определить какой из отрезков AO или BO образует больший угол с осью OX. ... }
- 'Задача 109' : Uses zadach109.pas; { Решить систему уравнений {ax+by+c=0 и a1x+b1y+c1=0 ... }
- 'Задача 11' : Uses zadah11.pas; { Формирование файл F целыми числами ci=2i+3i+1. Количество чисел равно n, где n-натуральное число.Запись чисел файла F в файл G с отрицательным знаком. Последним числом в ... }
- 'Задача 110' : Uses zadach110.pas; { Даны 4 точки x1, y1, x2, y2, x3, y3, x4, y4 Составить программу для опред. площади четырёхугольника, используя процедуру нахождения площади ... }
- 'Задача 111' : Uses zadach111.pas; { Ввести текст телеграммы и стоимость одного слова. Определить стоимость телеграммы При вводе текста запятые обозначить словом ЗПТ, точки- Т, других знаков препинания не ис ... }
- 'Задача 112' : Uses zadach112.pas; { На оси Оx заданы N точек с координатами x1, x2,..., xn. Найти такую точку Z сумма расстояний от которой до данных точек минимальная. ... }
- 'Задача 113' : Uses zadach113.pas; { Дана последовательность натуральных чисел Найти наименьшее нат.число, которое отсутствует в последовательности ... }
- 'Задача 114' : Uses zadach114.pas; { Используя вспомогательную функцию нахождения sin(x)=x-x**3/3!+x**5/5!-x**7/7!+... процесс суммирования остановить если очередной член станет меньше 0.001. Вычислить для з ... }
- 'Задача 115' : Uses zadach115.pas; { Используя вспомогательную функцию нахождения cos(x)=1-x**2/2!+x**4/4!-x**6/6!+... процесс суммирования остановить если очередной член станет меньше 0.001. Вычислить для з ... }
- 'Задача 116' : Uses zadach116.pas; { Дан текст. Установить пробелы вместо символов, номера позиций которых при делении на 4 дают в остатке 3 ... }
- 'Задача 117' : Uses zadach117.pas; { Дан текст. Удалить в нём все слова "функция". ... }
- 'Задача 118' : Uses zadach118.pas; { Даны слово и буква. Сколько раз эта буква встречается в данном слове. ... }
- 'Задача 119' : Uses zadach119.pas; { Зашифровать слово, поставив букве её номер в алфавите. ... }
- 'Задача 12' : Uses sortx.pas; { Дано число x. Hапечатать в порядке возрастания числа: sin x, cos x, ln
x. Если при каком-либо x некоторые из выражений не имеют смысла, вывести сообщение об этом и сравни ... }
- 'Задача 120' : Uses zadach120.pas; { ... }
- 'Задача 121' : Uses zadach121.pas; { Дан текст. Определить все слова оканчивающиеся на "ая". ... }
- 'Задача 122' : Uses zadach122.pas; { Дан текст. Сколько в нём слов "что". ... }
- 'Задача 123' : Uses zadach123.pas; { Определить сколькими различными способами можно подняться на десятую ступеньку, если за шаг можно подняться следующую или через одну. ... }
- 'Задача 124' : Uses zadach124.pas; { Найти кол-во n-значных чисел в десятичной системе счисления, у каждого из которых сумма цифр равна k. При этом в качестве n-значного числа мы допускаем и числа, начинающи ... }
- 'Задача 125' : Uses zadach125.pas; { Дано целое число N<20. Составьте программу, которая определяет кол-во различных делителей числа N!. ... }
Else writeln( 'Ничего не выбрано!'); End;Program pas2123;
Program pas2123..
|