Уменя паскаль abc пишу прогу, вот моя program abc; var f: file of char; c: char; r: integer; begin assign (f, 'c: \users\дети\desktop\абв.txt'); {$i-} reset (f); {$i+} r: = ioresult; if r < > 0 then writeln ('такого файла нет') else while not eof (f) do begin read (f, c); writeln (c); end; close (f); readln end. я не знаю в чём проблема на распечатке написано (примеры) так а пишет типо неизвестное имя ioresult

291

359

Посмотреть ответы 2

Ответы на вопрос:

05061972

Информатика

4,7(95 оценок)

Const file_path = 'c: \users\дети\desktop\абв.txt'; var f: file of char; c: char; begin if not fileexists(file_path) then writeln('такого файла нет') else begin assign(f, file_path); reset(f); while not eof(f) do begin read(f, c); writeln(c); end; close(f); end; readln(); end. не знаю подойдет ли это к вашей версии паскаля делалось на pascalabc.net 3.1.0.1200

Pakimon4ikYT

Информатика

4,5(53 оценок)

2016 =1024+512+256+128+64+32= = 2^10 +2^9 +2^8+2^7+2^6+2^5 ответ 6 файлов

Реши свою проблему, спроси otvet5GPT

Быстро
Мгновенный ответ на твой вопрос
Точно
Бот обладает знаниями во всех сферах
Бесплатно
Задай вопрос и получи ответ бесплатно

Задай свой вопрос

Популярно: Информатика

Есть вопросы?

Как otvet5GPT работает?

otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
Сколько это стоит?

Проект находиться на стадии тестирования и все услуги бесплатны.
Могу ли я использовать otvet5GPT в школе?

Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
В чем отличия от ChatGPT?

otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.