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

Ответы 1

  • PascalABC.NET 3.3.5, сборка 1644 от 23.03.2018Внимание! Если программа не работает, обновите версию!begin  var f:file of real;  // создаем файл  Rewrite(f,'MyFileOfReals.bin');  var a:=SeqRandom(10,1,30).Select(t->t/10).ToArray;  a.Println;  for var i:=0 to a.Length-1 do Write(f,a[i]);  f.Close;  // файл создан, далее собственно задание  Reset(f,'MyFileOfReals.bin');  f.Seek(f.FileSize-1);  var p:=f.Read;  p.Println;  f.Closeend.
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

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

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

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