PROGRAM6380.PAS

{* Задачи *}

{ Выберите программу или раздел при помощи графического манипулятора «Мышь» ! }
Case User Of
  •  'Задача 343' : Uses zadach343.pas; { Разработать программу, в которой необходимо выполнить следующие действия: описать новый тип – запись, состоящую из двух полей: Stroka Dlina; ввести с клавиатуры заданную ... }
  •  'Задача 344' : Uses zadach344.pas; { Программа для функции: Y(x)=IxI, при x <=0;Y(x)=-sin(2Пx)/2П, при 0< = x < =1; Y(x)=1-x, при x>=1; ... }
  •  'Задача 345' : Uses zadach345.pas; { В модуль включить подпрограмму вычисления произведения двух комплексных чисел. В основной программе вычислить (a+ib)2+(c+id)2 для заданных a, b, c, d. ... }
  •  'Задача 346' : Uses zadach346.pas; { Вычислить выражение: ... }
  •  'Задача 347' : Uses zadach347.pas; { Решить уравнение: ... }
  •  'Задача 348' : Uses zadach348.pas; { Для заданных N и x1,x2,…хn написать программу, используя подходящую функцию. ... }
  •  'Задача 349' : Uses zadach349.pas; { Составить программу вычисления значений функции F(x,y) для нескольких значений аргументов x и y при некоторых постоянных значениях входящих в нее величин a и b. ... }
  •  'Задача 35' : Uses zadach35.pas; { Дано предложение.Напечатать все различные слова. ... }
  •  'Задача 350' : Uses zadach350.pas; { Условие задачи: ... }
  •  'Задача 351' : Uses zadach351.pas; { Вычислить сумму элементов последовательности (n≤20), удовлетворяющих неравенству x>p. ... }
  •  'Задача 352' : Uses zadach352.pas; { Дана квадратная матрица A пятого порядка. Найти A2. ... }
  •  'Задача 353' : Uses zadach353.pas; { Для заданных N и x1, x2,…, xn написать программу, используя подходящую функцию. ... }
  •  'Задача 354' : Uses zadach354.pas; { Вычислить: ... }
  •  'Задача 355' : Uses zadach355.pas; { Вычислить произведение матрицы А на вектор b. Элементы результирующего вектора c=A*b определяются следующим образом: i=1,…,n(n=5,k=6) ... }
  •  'Задача 356' : Uses zadach356.pas; { Используя процедуру, поменять местами в квадратной матрице заданного размера диагонали, прилегающие к главной диагонали. ... }
  •  'Задача 357' : Uses zadach357.pas; { Вычислить: ... }
  •  'Задача 358' : Uses zadach358.pas; { Программа реализующая функцию: ... }
  •  'Задача 359' : Uses zadach359.pas; { Вычислить сумму: ... }
  •  'Задача 36' : Uses zadach36.pas; { Программа для назначения дежурного в классе из списка 10ти учеников с вероятностью 1/15, в остальных случаях дежурит учитель. ... }
  •  'Задача 360' : Uses zadach360.pas; { Составить программу для: ... }
  •  'Задача 361' : Uses zadach361.pas; { Определение функции: ... }
  •  'Задача 362' : Uses zadach362.pas; { Сосчитать суммы для указанных значений x. ... }
  •  'Задача 363' : Uses zadach363.pas; { По заданной последовательности x1,x2,…xn(n<=40) построить последовательность y1,y2,…,ym, исключив из заданной последовательности нулевые элементы. Определить количеств ... }
  •  'Задача 364' : Uses zadach364.pas; { Для заданных N и x1,x2,…,xn написать программу, используя подходящую функцию. ... }
  •  'Задача 365' : Uses zadach365.pas; { Вычислить: ... }
  •  'Задача 366' : Uses zadach366.pas; { Определение значения ... }
  •  'Задача 367' : Uses zadach367.pas; { Вычислить сумму: ... }
  •  'Задача 368' : Uses zadach368.pas; { Вычислить произведение матрицы на вектор. ... }
  •  'Задача 369' : Uses zadach369.pas; { Дана последовательность, выбросить из нее максимальные значения и вывести новую последовательность. ... }
  •  'Задача 37' : Uses zadach37.pas; { Программа для вычисления стоимости покупки, состоящей из нескольких тетрадей и карандашей. ... }
Else
 writeln('Ничего не выбрано!');
End;Program pas2123;
Program pas2123..