В чём ошибка при создании файла?

[If-then-do]

Помогите пожалуйста,возникла вот такая ситуация.Создал программу в Turbo Pascal7.0 для записи в типизированный файл(для real чисел),она работает но когда открываю блокнот вмето чисел написано непонятно что.В чём причина и как мне её устранить?

[Hacker19_90]

Для хранения текстовой информации пригодной для чтения используйте текстовые файлы, и пишите строками!

[If-then-do]

Кажется я чего-то недопонимаю:
Вот код программы
Program ex;
var c:array[1..10]of real;
i;integer;
name:char;
f:file of real;
Begin
WriteLn('Vvedite ima file');
ReadLn(name);
assign(f,name);
rewrite(f);
for i;=1 to 10 do
begin
c[i]:=random(9)+433-Random+random23-5427
write(f,c[i]);
end;
readln;
end;
Вот результат
ѓ Ж<ѓаm:XyЃЂY˜jѓ`=ЬSx„ДgЇ/„pкяx4‚@§кJj„0ZѕD„ђ“‰P„р-9[

[_-Re@l-_]

Еще б не типизированный файл взял. Еще хлеще бы получилось используй не файл оф реал, а text

[If-then-do]

А в чём же ошибка?Скажите пожалуйста.Я ещё пробовал брать тип f:text;Тогда всё нормально выводится ,но по заданию надо строго типизированный.
Или возможно создание такого файла of real, чтобы можно прочитать человеку.

[Serge_Bliznykov]

Кажется я чего-то недопонимаю:

Угу. Это точно.
Если Вы пишете f:file of real;
то создаётся типизированный файл. Это означает, что каждая компонента этого файла имеет свой строго заданный тип. В Вашем случае - этот тип - REAL
Это означает, что каждое число будет записано в ДВОИЧНОМ виде!
Т.е. 0 - запишется как 00 00 00 00 00 00
число 1 запишется как 81 00 00 00 00 00
а число 3.14159 как 82 DC 80 CF 0F 49

и что Вы ожидаете увидеть в блокноте?! Текст?
Тогда, как Вам справедливо сказали чуть выше, делайте ТЕКСТОВЫЙ файл... Но это совсем другая песня...

Или возможно создание такого файла of real, чтобы можно прочитать человеку.

НЕТ. Такое НЕВОЗМОЖНО.
Делайте как делали и не парьтесь!

[If-then-do]

Хорошо!Всем ОГРОМНОЕ СПАСИБО за помощь!!