const x=0.3; var y : integer; A : array[1..9] of integer; F : text; begin read (0.3); // чтение "в никуда" - нет переменной, которая примет введённое значение. read (x); // тоже самое, но константа указана по имени readln (0.15 * y); // тоже самое, но вместо константы - целое выражение readln (A); // составной тип данных можно заполнять только по-элементно readln (F); // "неудачное" чтение из файла F - и файл F не открыт, и не указана // переменная-приёмник. Считать же саму файловую переменную F - нельзя! end.