Procedure Val( S: string; var Число; var Кількість: integer)

Параметр S повинен бути виразом рядкового типу, Число - змінною цілого або дійсного типу, а Кількість - змінною цілого типу. Процедура читає з рядка S текст, доки він відповідає синтаксису запису цілого чи дійсного числа, залежно від типу параметру Число. Результат присвоюється змінній Число, а змінна Кількість дорівнює кількості прочитаних символів.
Наведемо програму, яка демонструє різні варіанти виклику процедури Значення:

Program ValDemo;
Var
x, k: integer;
y: real;
Begin
Val( '1234', x, k );
Write( k ); If k=0 then WriteLn( ' x=', x ) else WriteLn;
Val( 'abc', x, k );
Write( k ); If k=0 then WriteLn( ' x=', x ) else WriteLn;
Val( '-1.3E-3', y, k );
Write( k ); If k=0 then WriteLn( ' y=', y ) else WriteLn;
Val( '-1.3E 4', y, k );
Write( k ); If k=0 then WriteLn( ' y=', y ) else WriteLn;
end.

Під час виконання програми виводиться така інформація:

0 x=1234
1
0 y=1.300000E-003
6

Зауваження: у всіх описаних в цьому розділі функціях і процедурах можна замість параметру-значення рядкового типу використовувати довільний вираз символьного типу.