PROGRAM6380.PAS

{* Задачи *}

{ Выберите программу или раздел при помощи графического манипулятора «Мышь» ! }
Case User Of
  •  'Задача 397' : Uses zadach397.pas; { Сформировать матрицы {aij}n,m , {bij}k,l , где i<=(n,k), j<=(m,l), по заданно- му правилу sin(i+j/2). Фактическое число строк (n,k) и столбцов (m,l) ка- ждой мат ... }
  •  'Задача 398' : Uses zadach398.pas; { Вычислить выражение: ... }
  •  'Задача 399' : Uses zadach399.pas; { Вычислить значение выражения: ... }
  •  'Задача 4' : Uses pasz13494.pas; { В течении месяца продавец доставлялна дом 4 л молока в день. В марте молоко стоило х руб за литр Спервого апреля цена молока увеличилась до [x+a] руб за литр Сколько надо ... }
  •  'Задача 40' : Uses zadach40.pas; { Проверка логина и пароля пользователя, если всё введено правильно, то появится сообщение "Welcome" , если ошибётесь то выводится сообщение "Error". логин - use , пароль - ... }
  •  'Задача 400' : Uses zadach400.pas; { При заданных X1, X2, … Xn и Y1, Y2, … Yn найти значение суммы: ... }
  •  'Задача 401' : Uses zadach401.pas; { В тексте в каждой строке осуществить перестановку таким образом, чтобы первый символ стал последним, второй - предпоследними т. д. ... }
  •  'Задача 402' : Uses zadach402.pas; { Проверить лежат ли точки в заданном участке графика. Результат вывести в файл. ... }
  •  'Задача 403' : Uses zadach403.pas; { Составить программу содержащую функцию вычисляющую скалярное произведение, равное ... }
  •  'Задача 404' : Uses zadach404.pas; { Составить программу содержащую процедуру перемещающую отрицательные элементы массива С1, С2, … Сn в его конец, а положительные в начало. ... }
  •  'Задача 405' : Uses zadach405.pas; { Напишите программу решения уравнения A * X = B, где A и B – произвольные числа. ... }
  •  'Задача 406' : Uses zadach406.pas; { Напишите программу решения уравнения A * X = 40. ... }
  •  'Задача 407' : Uses zadach407.pas; { Напишите программу решения неравенства A * X > 40. ... }
  •  'Задача 408' : Uses zadach408.pas; { Даны числа A, B, C. Найдите максимальное число из них. Составьте блок-схему и напишите программу решения задачи. ... }
  •  'Задача 409' : Uses zadach409.pas; { Даны числа A, B, C. Найдите произведение максимального и минимального чисел ... }
  •  'Задача 41' : Uses zadach41.pas; { Определение подходящего возраста кандидатуру для вступления в брак, используя следующее соображение: возраст девушки равен половине возраста мужчины плюс 7, возраст мужчи ... }
  •  'Задача 410' : Uses zadach410.pas; { Найдите сумму максимального и минимального чисел из трех заданных. ... }
  •  'Задача 411' : Uses zadach411.pas; { Напишите программу вычисления суммы первых 20 членов последовательности с общим членом: ... }
  •  'Задача 412' : Uses zadach412.pas; { Найдите сумму первых N членов ряда: ... }
  •  'Задача 413' : Uses zadach413.pas; { 19. Дано натуральное число N. Разложить его на простые множители и вывести результат в виде: например: 12 = 1*2*2*3. ... }
  •  'Задача 414' : Uses zadach414.pas; { Имеется четыре (A, B, C, D) числа. Необходимо ответить на вопрос: «Правда ли что все среди этих чисел есть равные?» Ответ вывести в виде текста: «Правда», или «Неправда». ... }
  •  'Задача 415' : Uses zadach415.pas; { Составить программу вычисления и выдачи на печать суммы (произведения) N элементов бесконечного ряда. Оформить проверку задания. Y=(-512)*256*(-128)*64…… ... }
  •  'Задача 416' : Uses zadach416.pas; { Имеется массив А из N произвольных чисел (A(n)), среди которых есть положительные, отрицательные и равные нулю. Напечатать только те числа из массива которые больше преды ... }
  •  'Задача 417' : Uses zadach417.pas; { Составить программу вычисления числового ряда для известного числа членов ряда N. Y=(7+35/1)(8-3-4/2)(9+33/3)…. ... }
  •  'Задача 418' : Uses zadach418.pas; { Выполнить действия над массивами. Программа должна обрабатывать любые числа. Предельная размерность массивов до 10, реальная размерность N. Программа должна предъявлять и ... }
  •  'Задача 419' : Uses zadach419.pas; { Данные о пассажирах включают фамилию пассажира номер места и общий вес . багажа Программа должна выполнять вывод данных о пассажире по указанной фамилии находить пассажи ... }
  •  'Задача 42' : Uses zadach42.pas; { Одноклеточная амеба делится каждые 3 часа на 2 клетки, определить сколько клеток будет через 3, 6, 9, 12....24 часа? ... }
  •  'Задача 420' : Uses zadach420.pas; { Имеется текстовый файл Получить новый файл, в котором в конце каждой строки из заданного файла добавлен восклицательный знак ... }
  •  'Задача 421' : Uses zadach421.pas; { . Заданы пять значений количества заболевших свиным гриппом в классе за пять лет. Например: 12 (1990), 30 (1991), 11 (1992), 21 (1993), 4 (1994). С помощью Bard3D построй ... }
  •  'Задача 422' : Uses zadach422.pas; { Известны результаты сдачи трех экзаменов десятью студентами. Найти средний балл каждого студента и общий средний балл. Точность среднего балла – два знака после запятой. ... }
Else
 writeln('Ничего не выбрано!');
End;Program pas2123;
Program pas2123..