PROGRAM6380.PAS

{* Задачи *}

{ Выберите программу или раздел при помощи графического манипулятора «Мышь» ! }
Case User Of
  •  'Задача 182' : Uses zadach182.pas; { Для того, чтобы разделить маршруты 2 туристических агенств, у одного из них-все маршруты имеют нечётные номера, а у другого -чётные.Всего поступило n заявок с указанием н ... }
  •  'Задача 183' : Uses zadach183.pas; { В линейном массиве вещественных чисел a(n) заменить все элементы, большие 10, на число c. ... }
  •  'Задача 184' : Uses zadach184.pas; { Вычислить произведение чисел в каждом столбце. n<=10, m<=10. ... }
  •  'Задача 185' : Uses zadach185.pas; { Опишите запись с именем типа Baza, содержащую информацию для школьной базы : личный номер ученика (тип integer), ФИО (тип string), год рождения (integer), адрес (string). ... }
  •  'Задача 186' : Uses zadach186.pas; { Дана строка символов. Вычислить количество букв "а". Заменить в строке буквосочетание "ох" на "ах" ... }
  •  'Задача 187' : Uses zadach187.pas; { Длина самого длинного слова в предложении: ... }
  •  'Задача 188' : Uses zadach188.pas; { Произведение элементов главной диагонали трехмерного массива ... }
  •  'Задача 188' : Uses zadach188.pas; { Количество символов в последнем слове ... }
  •  'Задача 189' : Uses zadach189.pas; { Цифры, которых нет в числе ... }
  •  'Задача 19' : Uses zadach19.pas; { Известен рост тридцати спортсменов, сколько из них имеют рост выше 170см. Можно ли сформировать баскетбольную команду? (оговорка:баскетбольную команду можно сформировать ... }
  •  'Задача 190' : Uses zadach190.pas; { В первый день тренировок спортсмен пробежал 1 км. Каждый следущий день он пробегал расстояние на 10% более, чем в предыдущий. Сколко вскго км пробежит за n дней? ... }
  •  'Задача 191' : Uses zadach191.pas; { Даны действительные числа a0,..., a5, многочлен Р(х) шестой степени. Получить действительные числа d0,..., d7, такие, что P(x)=d0+d1(x−a0)+d2(x−a0)(x−a1 ... }
  •  'Задача 192' : Uses zadach192.pas; { Даны натуральное число N и последовательность A1, A2,..., An. Получить все элементы, входящие в данную последовательность более одного раза. ... }
  •  'Задача 194' : Uses zadach194.pas; { Вычислить количество пятниц, приходящихся на 13-е числа ХХ столетия ... }
  •  'Задача 195' : Uses zadach195.pas; { Дана символьная строка. Слово - последовательность символов между пробелами, не содержащая пробелы внутри себя. Определить количество слов заданной длины. ... }
  •  'Задача 196' : Uses zadach196.pas; { Получить все, меньшие 106, натуральные числа, которые являются палиндромами как в десятичной, так и в двоичной системах. ... }
  •  'Задача 197' : Uses zadach197.pas; { Написать программу, которая рисует равнобедренный треугольник с заданными катетами, пятью различными способами: for to repeat until while do рекурсия (зацикливание) goto ... }
  •  'Задача 198' : Uses zadach198.pas; { Написать программу, которая осуществляет ввод строки с клавиатуры, а затем выводит на экран символы латинского алфавита нижнего регистра, не встречающихся в строке, затем ... }
  •  'Задача 199' : Uses zadach199.pas; { Каждый из N посетителей кафе (N-заданное число) выбрал 3 блюда из предложенного списка, содержащего 10 наименований. Необходимо определить кол-во посетителей, чьи вкусы п ... }
  •  'Задача 2' : Uses zadacha2.pas; { Одно число в 2 раза больше другого, а их сумма равна 93. Найти эти числа. ... }
  •  'Задача 20' : Uses zadach20.pas; { Дана последовательность неотрицательных чисел, последнее из которых равно нулю; причем равных нулю чисел в последовательности нет. Найти среднее арифметическое всех полож ... }
  •  'Задача 20' : Uses zadah20.pas; { Дан массив ненулевых целых чисел размера N. Проверить, образуют ли его элементы геометрическую прогрессию. Если образуют то вывести знаменатель прогрессии, если нет – ... }
  •  'Задача 200' : Uses zadach200.pas; { В правильной четырехугольной пирамиде провести сечение проходящее через диагональ основания и вершину пирамиды. ... }
  •  'Задача 201' : Uses zadach201.pas; { В чемпионате по футболу команде за выиграш дается 3 очка, за проигрышь 0, за ничью 1.Известно число очков полученых командой за каждую из провиденных игр.определить колич ... }
  •  'Задача 202' : Uses zadach202.pas; { В области 12 районов. Известны количество жителей и площадь каждого района. Определить среднюю плотность насе-ления по области в целом ... }
  •  'Задача 203' : Uses zadach203.pas; { Сколько времени в минутах затратит школьник на дорогу из школы до станции, если известно расстояние S км и скорость движения V км/ч? ... }
  •  'Задача 204' : Uses zadach204.pas; { Цена 1 кг сыра К рублей. Программа определения стоимости 100 грамм, 200, 300, 400, 500, 600, 700, 800 грамм сыра. ... }
  •  'Задача 205' : Uses zadach205.pas; { Дана последовательность слов, между словами пробел, за последним словом точка.Напечатать текст, состоящий из последних символов всех слов. ... }
  •  'Задача 206' : Uses zadach206.pas; { Дано целое число N(>0). Если оно является степенью числа 3, то вывести TRUE, если не является - вывести FALSE. ... }
  •  'Задача 207' : Uses zadach207.pas; { Дано целое число N(>0), являющееся некоторой степенью числа 2: N=2 в степени K. Найти целое число K - показатель этой степени. ... }
Else
 writeln('Ничего не выбрано!');
End;Program pas2123;
Program pas2123..