delphi



Открыть файл multiply.dat с помощью assight(t:text,'multiply.dat');
найти из них три максимальных числа и с помощью write(t,'multiply.res') записать их;
end