@CRem

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

Дан текстовый файл, содержащий данные о доходе четырех подразделений фирмы «Феникс» за пять лет.
a. Определить средний доход каждого подразделения за пять лет.
b. Для каждого подразделения определить самые прибыльные годы.

может кто-нибудь хоть что-то написать???
очень нужна ваша помощь!!!

0

@MaxZebra

Поподробней пожалуйста...
НУ а так образно, как бы сделал я, создаешь :
type
Info=record
year1:integer;
year2:integer;
year3:integer;
year4:integer;
year5:integer;
end;
Создаешь массив глобальный, Comp:array[1..4] of Info;
for i:=1 to 4 do
begin
Comp[i].Year1:=сумма из файла для i компании за 1 год;
Comp[i].Year2:=сумма из файла для i компании за 2 год;
Comp[i].Year3:=сумма из файла для i компании за 3 год;
Comp[i].Year4:=сумма из файла для i компании за 4 год;
Comp[i].Year5:=сумма из файла для i компании за 5 год;
end;
Считывая из файла заполняешь поля для каждого отдела(см. выше), и дальше по циклу сравниваешь и смотришь что тебе надо.

Повторюсь, вариант мой, кому-то громоздкий, но эт пришло мне в голову, строго не судите.

0

@CRem

Спасибо, попробую так.

Добавлено через 9 часов 55 минут
Может еще кто-нибудь поможет?

0

@MaxZebra

Такой вариант как я написал не получился? Если да то что конкретно, может по другому помогу...

0

@CRem

Там нужно считывать данные с текстового файла, в файле числа (4х5) о доходе.

0

@Сидорович

Вот. И, в частности, вот.

0