Delphi дан файл f,компоненты которого являются действительными числами.Найти разность первой и последней компонент файла
Скиньте код пожалуста(работаю на старой версии)
Скиньте код пожалуста(работаю на старой версии)
More Questions From This User See All
Answers & Comments
Verified answer
Если файл типизированный, то один из вариантов решения задачи такой:var f: file of real; a,b,r:real;
begin
AssignFile(f,'myFile.dat');
Reset(f);
Read(f,a);
while not eof(f) do read(f,b);
r:=a-b;
//здесь нужно вывести r
Close(f);
end;
Вывод r зависит от того, какое программу Вы делаете - консольное или Windows-приложение.