Pascal. Задача с файлами. Простенькая

Дан файл вещественных чисел. определить количество нулевых значений в этом файле.
Мой текст ниже(Моё мнение снизу. Прошу прочесть перед ответом):
-----
program zad2;
var f:text;p:real;s,i:integer;
begin
assign(f,'vxod.txt');
reset(f);
readln(f,p);
for i:=1 to length(p) do
if p[i]=0 then s:=s+1;
close(p);
writeln(s:2);
readln();
end.
________
Возникло противоречие с типами. Если я поставлю p типом string, то будет верно, но мне надо вытащить из него числа, между которыми стоит пробел. Мне что, строку теперь обрабатывать с помощью процедуры для вытаскивания числовых значений? Кажется, val. Неужели, все так сложно?

RPI.su - самая большая русскоязычная база вопросов и ответов. Наш проект был реализован как продолжение популярного сервиса otvety.google.ru, который был закрыт и удален 30 апреля 2015 года. Мы решили воскресить полезный сервис Ответы Гугл, чтобы любой человек смог публично узнать ответ на свой вопрос у интернет сообщества.

Все вопросы, добавленные на сайт ответов Google, мы скопировали и сохранили здесь. Имена старых пользователей также отображены в том виде, в котором они существовали ранее. Только нужно заново пройти регистрацию, чтобы иметь возможность задавать вопросы, или отвечать другим.

Чтобы связаться с нами по любому вопросу О САЙТЕ (реклама, сотрудничество, отзыв о сервисе), пишите на почту [email protected]. Только все общие вопросы размещайте на сайте, на них ответ по почте не предоставляется.