Создание текстового редактора
| Категория реферата: Рефераты по информатике, программированию
| Теги реферата: бесплатные курсовые работы скачать, контрольные работы 8 класс
| Добавил(а) на сайт: Sharshin.
Предыдущая страница реферата | 2 3 4 5 6 7 8 9 10 11 12 | Следующая страница реферата
readln(name);
assign(f1,name);
reset(f1);
if ioresult<>0 then
begin
gotoxy(2,21);
writeln('Файл не найден ... ');
close(f1);
end;
until ioresult=0;
{$I+}
table;
gotoxy(1,2);
while not eof(f1) do
begin
readln(f1,txt);
writeln(chr(179),txt);
end;
close(f1);
gotoxy(2,21);
write('Файл считан, нажмите чего-нибудь ... ');
end;
68:goto b; {F10} {Происходит выход на метку}
end;
until i<0; {считывай функциональные клавиши пока i<0,
Рекомендуем скачать другие рефераты по теме: сочинение капитанская, борьба реферат.
Категории:
Предыдущая страница реферата | 2 3 4 5 6 7 8 9 10 11 12 | Следующая страница реферата