Ответы на вопрос:
Массив одномерный, список сортируем, находим, восхищаемся когда потребуется мноого переменных сохранить я позову тебя! массив!
program pr1; uses crt; var fl1,fl2: text; i,n,v,a,b: integer; beginclrscr; assign(fl1,'input.txt'); assign(fl2,'output.txt'); reset(fl1); readln(fl1,n); v: =0; for i: =1 to 1000000 do begin if i> =10 then begin a: =i div 10; b: =i mod 10; if (a mod 2< > 0) and (b mod 2< > 0) then v: =v+1; end else if i mod 2< > 0 then v: =v+1; if v=n then break; end; rewrite(fl2); writeln(fl2,v); close(fl1); close(fl2); end.
все работает я проверил
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
aksenovazlata04.02.2023 18:31
-
nyuta148802.03.2023 00:11
-
ThreeCats05.07.2021 14:10
-
pollypron18.05.2022 01:45
-
ПРИВЕТ174rus29.08.2020 11:12
-
Лизунчик01122.02.2020 04:09
-
DragonSeeS09.05.2020 12:01
-
Khlana3013.01.2020 02:19
-
СлаваТрегубкин07.01.2022 01:28
-
Настя354695518.02.2023 18:30
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.