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

Delphi дан файл f,компоненты которого являются действительными числами.Найти разность первой и последней компонент файла
Гость
Ответ(ы) на вопрос:
Гость
Ответ на Ваш вопрос зависит от того, что Вы разрабатываете - Windows-приложение или консольное. В любом случае основная часть программы может быть, например, такой: 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; Программа будет работать, если: 1. используется типизированный файл, который был создан ранее; 2. файл находится в той же папке, что и программа 3. если разрабатывается Windows-приложение, то приведенный текст должен быть внутри обработчика какого-либо события 4. для вывода результата на форму (в случае Windows-приложения) следует использовать какой-либо компонент из палитры (например, Label)
Не нашли ответ?
Ответить на вопрос
Похожие вопросы