Дан файл вещественных чисел. Найти его первый локальный минимум.

[nadyaH]

Дан файл вещественных чисел. Найти его первый локальный минимум (локальным минимумом называется элемент, который меньше своих соседей).
Нужна помощь в написании программы. Делфи7.

[Vanta11a]

Что будет, если 1 элемент меньше 2го? N'й элемент меньше N-1'го?

[nadyaH]

Я не работала в делфи с файлами. Не представляю что это такое!

var F: TextFile; 
    V: String;
begin
with OpenDialog1 do 
  if Execute then
   begin
   AssignFile(f,'E/ÄÇ ïî èíôîðìàòèêå/File 18/ôàéë');
    resed(f);
while (not EOF(F)) do 
        begin 
          Readln(F, V);
          Memo1.Lines.Add(V);
        end;
end;
end.

Чтение файла. Не знаю в чём ошибка. Где она?

[Streletz]

Не знаю в чём ошибка. Где она?

В чём состоит ошибка?

[nadyaH]

 OpenDialog1
       Execute 
       resed(f)

здесь показывает ошибку.

[Streletz]

Может, вместо resed, надо написать так:

reset(f)

[nadyaH]

на предыдущих словах так и показывает ошибку!

[ZX Spectrum-128]

У вас изначально ошибка. Вам дан файл вещественных чисел
File of real, а вы пытаетесь использовать текстовый.

[nadyaH]

вот программа.

[Stilet]

вот программа.

А теперь читаем до полного просветления пост №5.
Дальнейшие рассуждения бессмысленны пока на вышеуказанный вопрос не будет дан ответ.