Преобразуйте числа двоичной основы в десятичное и проверьте, снова преобразовав полученное десятичное число в двоичное.
1111000
1010111
1000000
Ответы на вопрос:
const n = 10; //количество чисел, которое нужно сформировать first = -10; //с какого числа должны генерироваться случайные числа second = 15; {по какое число должны генерироваться случайные числа(например в данном случае случайные числа генерируются в диапазоне от - 10 до 15)}
var f, g, h: text; i: integer; number: array [1..n] of integer; {массив, в который записываются числа, считанные из файлов}
begin randomize; assign(f, 'f.txt'); //инициализируем файл f assign(g, 'g.txt'); //инициализируем файл g assign(h, 'h.txt'); //инициализируем файл h rewrite(f); //открываем файл f для записи for i: = 1 to n div 2 do write(f, random(abs(first) + abs(second)) + first , ' '); {первую половину чисел записываем в файл f} close(f); //закрываем файл f rewrite(g); //открываем файл g для записи for i: = (n div 2) + 1 to n do write(g, random(abs(first) + abs(second)) + first, ' '); {вторую половину случайно сгенерированных чисел записываем в файл g} close(g); //закрываем файл g reset(f); //открываем файл f для считывания for i: = 1 to n div 2 do read(f, number[i]); {первую половину чисел считываем из файла f в массив} close(f); //закрываем файл f reset(g); //открываем файл g для считывания for i: = (n div 2) + 1 to n do read(g, number[i]); {вторую половину чисел считываем из файла g в массив} close(g); //закрываем файл g rewrite(h); //открываем файл h для записи for i: = 1 to n div 2 do write(h, number[i], ' '); {первую половину считанных чисел из массива записываем в файл h} writeln(h); //перевод на новую строку в файле h for i: = (n div 2) + 1 to n do write(h, number[i], ' '); {вторую половину считанных чисел из массива записываем в файл h} close(h); //закрываем файл hend.
все файлы там же, где находится файл программы.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
vikakivi120616.05.2023 10:12
-
Elizzzavettta15.07.2021 13:01
-
daulbaevazanel12314.10.2021 16:45
-
СофаСтар224.09.2020 05:52
-
talyaarpaci07.09.2021 10:38
-
romabryuxachev11.03.2020 16:13
-
Эвелина201923.04.2023 03:50
-
122599baikal30.08.2020 10:27
-
BlaBla1aquamarine04.03.2020 19:57
-
vikakruchko140502.06.2022 00:26
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.