Напишите программу, которая по введенным с клавиатуры числам e, f и g будет вычислять значения коэффициентов a, b и c квадратного уравнения по предлагаемым формулам, а также значение дискриминанта d, решать это квадратное уравнение и выдавать результаты его решения. a= √( (e^2) / 7 - а ) ^ 3 b= |e-f| /3 + g c= е^3 - f^2 \ s sin g где дискриминант d=b^2-4*a*c; корни уравнения x1,2= -b+-√d / 2*a e=2 f= -5 g= 15 a=13,1507 ; b=17,3333 ; c=-5,22845; d=575,476; x1=0,253056; x2=-1,57111

Const
  maxN = 100; // Максимальное кол-во элементов массива
var
  n, i: longint;
  middle, sum, sum2: real; // Может быть нецелым числом
  a: array[1..maxN] of real;
begin
  write('Введите количество элементов массива: ');
  readln(n);
  sum := 0; // Считаем сумму всех элементов, чтобы найти среднее арифметическое
  write('Введите элементы массива через пробел: ');
  for i := 1 to n do begin
    read(a[i]);
    sum := sum + a[i];
  end;
  middle := sum / n; // Вычисляем среднее арифметическое
  writeln('Среднее арифметическое = ', middle);
  sum2 := 0; // Считаем сумму элеметов, меньших среднего арифметического
  for i := 1 to n do
   if a[i] < middle then
     sum2 := sum2 + a[i];
  writeln('Сумма элементов, меньших среднего арифметического = ', sum2);
end.

Active GIF Creator (russian edition) - мощный, доступный и понятный инструмент для создания и оптимизации GIF-анимаций, 3D кнопок, баннеров для Web и презентаций. Вы можете использовать также графику, созданную или отредактированную в любом другом графическом редакторе, например, в Windows Paint, Adobe Photoshop. Постоянное совершенствование программы направлено на расширение возможностей и удобство в работе как для начинающих, так и для опытных пользователей. Свойства программы: - Создаёт анимированные GIF-файлы из набора BMP, JPEG, ICO, PCX, Adobe Photoshop PSD -файлов и метафайлов Windows; - Редактирует изображения, используя внутренний графический редактор; - Импортирует кадры (фреймы) из других GIF-файлов; - Дублирует, объединяет, вырезает, изменяет размеры, поворачивает и перемещает фреймы; - Определяет глобальные параметры GIF-файлов, логический размер экрана, индекс цвета для фона, число циклов в анимации; - Определяет смещение, прозрачность, проявление, задержку, заголовок и значение "как удалять" для каждого отдельного образа; - Поволяет применять набор эффектов для образа и для его любой выделенной прямоугольной части; - Добавляет и удаляет текстовые комментарии; - Редактирует цветовые палитры; - Оптимизирует размер GIF-файлов; - Показывает размер GIF-файла и время загрузки для различных скоростей модемов; - Сохраняет образы GIF-файлов как набор BMP, JPEG или TIFF-файлов; - Экспортирует и импортирует AVI-файлы; - Экспортирует и импортирует ANI-файлы (анимированные курсоры); - Экспортирует и импортирует растровую полоску; - Создает образы трехмерных кнопок; - Позволяет просматривать GIF-файл на Web-странице с различными фонами; - Создаёт карту для тэга в HTML; - Создаёт GIF-файлы из командной строки command в пакетном режиме.