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

Ответы 1

  • Если файл типизированный, то один из вариантов решения задачи такой:var f: file of real; a,b,r:real;beginAssignFile(f,'myFile.dat');Reset(f);Read(f,a);while not eof(f) do read(f,b);r:=a-b;//здесь нужно вывести rClose(f);end;Вывод r зависит от того, какое программу Вы делаете - консольное или Windows-приложение.
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years