Статистика
Всего в нашей базе более 4 327 657 вопросов и 6 445 963 ответов!

дан файл f компоненты которого являются действительными числами, найти сумму наибольшего и наименьшего из значений компонент. паскаль

10-11 класс

AmInOkA 08 июня 2014 г., 15:56:43 (9 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
Cheremukhina77
08 июня 2014 г., 17:18:22 (9 лет назад)

var
  f: file of real;
  a, amin, amax: real;

begin
  Assign(f, 'input.dat');
  Reset(f);
  amin := 1e-20;
  amax := 1e20;
  while not Eof(f) do
  begin
    read(f, a);
    if amin > a then amin := a;
    if amax < a then amax := a
  end;
  Close(f);
  writeln('Сумма минимального и максимального элементов равна ', amin + amax)
end.

Ответить

Другие вопросы из категории

Pascal abc

составить программу
через array и for
Подсчитайте количество морозных дней (когда температура ниже -20 град.).

Помогите пожалуйста решить((

попробую прикрепить задание.
" Выполните арифметические операции над двоичными числами"
110111011+110110110
1101110001-11011011
110010*101110
101000100110:110101

Помогите, Решить в Паскале:

S=1/(1+1)+1/(1+2)+...1/(1+n)

Читайте также

Дан файл f, компоненты которого являются целыми числами.

Найти количество квадратов нечетных чисел среди компонент файла. Записать это значение в начало нового файла g. Остальные значения переписать из исходного файла f.

Напишите пожалуйста в Паскаль.

Массив из 15 элементов заполнить случайными четными числами в интервале от -25 до 70. Вывести полученный массив на экран в строчку.Найти сумму наибольшего и наименьшего элементов массива. (Использовать пузырьковую сортировку).

Написать в Паскаль

Массив из 15 элементов заполнить случайными четными числами в интервале от -25 до 70. Вывести полученный массив на экран в строчку.Найти сумму наибольшего и наименьшего элементов массива. (Использовать пузырьковую сортировку).

Напишите прог-у на паскале... ПЛИИИИИИИИИИЗ 1)даны действительные числа a1, b1, c1, a2, b2, c2. Составьте программу, которая находит координаты точки

пересечения прямых, описываемых уравнениями a1x+b1x=c1 и a2x+b2x=c2. Если прямые пересекаются или не существуют-выдать соответствующее сообщение. 2) даны действительные числа a1, b1, a2, b2. Составьте программу, которая определяет, какая из точек A(a1;b1) или B(a2;b2) лежит на прямой у=2х+1. Если такой точки нет-вывести соответсвующее сообщение.

Составить программы: 1.Дана строка символов, среди которых есть двоеточие. Определить, сколько символов следуют за двоеточием.

2.Дана строка символов, среди которых есть одна открывающаяся и одна закрывающаяся скобка. Подсчитать, сколько слов расположено внутри этих скобок.

3.Дана строка. Удалить из нее все запятые и подсчитать, сколько получилось удаленных символов.

Помогите, пожалуйста!



Вы находитесь на странице вопроса "дан файл f компоненты которого являются действительными числами, найти сумму наибольшего и наименьшего из значений компонент. паскаль", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.