Pascal, , . создайте файл f целых чисел от а до в (значения вводятся с клавиатуры). проанализировав в программе созданный файл, создайте еще 3 файла: - содержащий отрицательные числа, - содержащий положительные числа, - содержащий нуль. выведите на экран содержимое файлов. предусмотрите в программе вывод соответствующего сообщения, если элементов в файле не оказалось.
273
443
Ответы на вопрос:
Var f: string : = 'output1.txt'; fo: array of string : = ('out1.txt', 'out2.txt', 'out3.txt'); bools: array [0..2] of boolean; a, b: integer; begin system.io.file.writealltext(f, ''); foreach str: string in fo do system.io.file.writealltext(str, ''); readln(a, b); for i: integer : = a to b do system.io.file.appendalltext(f, i.tostring() + system.environment.newline); foreach str: string in system.io.file.readalllines(f) do begin b : = strtoint(str); bools[system.math.sign(b) + 1] : = true; system.io.file.appendalltext(fo[system.math.sign(b) + 1], b.tostring() + system.environment.newline); end; for i: integer : = 0 to 2 do if not (bools[i]) then begin write('в файле с '); case i of 2: write('положительными'); 1: write('нулевыми'); 0: write('отрицательными'); end; writeln(' значениями нет записей'); end; end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
nickitasychev19.01.2022 12:36
-
Лизик200711.03.2021 00:40
-
gregoryan200108.08.2021 19:32
-
amir15825.10.2022 13:23
-
colaboyy7704ox6ktx11.06.2023 22:09
-
лерка21019807.11.2021 06:22
-
Krauler126.10.2020 12:18
-
lesikon1111.10.2022 13:14
-
solomia11325.11.2022 01:51
-
onion208.08.2020 05:34
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.