Program dialog;
const
Question='What is your name?';
Reply1='Ïàñêàëü-ïðîñò,íî ïåðâûé êîìïèëÿòîð Ïàñêàëÿ áûë íàïèñàí íà Ïàñêàëå';
Reply21='Âàñ æäåò óäèâèòåëüíîå ïóòåøåñòâèå';
Reply22='ñêâîçü äæóíãëè âîçìîæííîñòè è îñîáåííîñòè ÿçûêà';
ReplyS='Ïàñêàëü-ðàçóìíûé êîìïðîìèññ ìåæäó æåëàòåëüíûì è ýôôåêòåâíûì';
Reply4='Ïàñêàëü-àêàäåìè÷åñêè ýëåãàíòåí';
var Name:string;Age:byte;
begin
writeln(Question);readln(name);
writeln('Hello,',Name,'!');
write('How old are you?');readln(age);
case Age of
0..11:writeln(Reply1);
12..19:begin writeln('Reply21');writeln(Reply22)end;
20..39:writeln(Reply5);
40..150:writeln(Reply4);
else writeln('Âû îøèáëèñü ïðè ââîäå');
end;
end. 

20..39:writeln(Reply5);выдаёт ошибку

Потому что у тебя есть ReplyS, но не reply5.

я replyS тоже писал все равно выдает ошибку

А у меня компилируется с ReplyS.

Неправда... Не выдает. Покажи скриншот в момент ошибки, если она у тебя есть, очень посмотреть хочется...

У меня выдаёт ошибку 14,после того как я написал ReplyS

Компилятор TP?

И на какой строке ошибка?

пишет что ошибка 13 invalid filename [c:11/pascal/noname.exe

Я точно не знаю, но кажется, это из-за readln, возможно, ввод из файла установлен каким-то образом. И ты компилятор так и не указал.

он не показывает на какой строке ошибка


Добавлено через 1 мин.

извиняюсь т.е 14 ошибка

Добавлено через 1 мин.

пожалуйста напиши мою программу заново и я скопирую ее и посматрю может получится так

У тебя не то процитировалось Я просто редактировал пост, в ответ на это:


13 - это не код ошибки, а номер строки.

Добавлено через 2 мин.
Скопируй свою и замени Reply5 на ReplyS, делов-то.

все равно вылезает Error14 invalid filename.может паскаль плохо работае дай ссылку пожалйста на хорошую прогр.Паскаль

Мы твой компилятор сегодня услышим?

название программы сказать))??я просто новичок еще хорошо не разбираюсь в компилляторах))

Добавлено через 2 мин.

Turbo Pascal

Мм сложный вопрос, у тебя в компиляторе опция в менюшке Compiler стоит "Destination Disk" или "Destination Memory"? Вообще, попробуй создать новый файл-исходник с другим именем и откомпилировать его (Alt+F9).