Информатика (pascal): составить программу для решения следующей : среди всех положительных трёхзначных чисел найти и выписать на экран те,у которых сумма крайних цифр совпадает с утроенной средней цифрой.
285
293
Ответы на вопрос:
// pascalabc.net 3.2, сборка 1439 от 09.05.2017 // внимание! если программа не работает, обновите версию! begin for var i: =1 to 9 do for var j: =0 to 9 do for var k: =0 to 9 do if i+k=3*j then write(i,j,k,' '); writeln end. результат 112 125 138 211 224 237 310 323 336 349 422 435 448 521 534 547 620 633 646 659 732 745 758 831 844 857 930 943 956 969
Var a,b,c: byte; begin for a: = 1 to 9 do for b: = 0 to 9 do for c: = 0 to 9 do if a+c = 3*b then write(a,b,c,' ') end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
vansob200331.12.2021 10:26
-
DennisWhitel23.01.2022 06:36
-
omim17.12.2020 05:28
-
ArtSvet19.10.2020 16:14
-
24669116.04.2023 05:52
-
aav727.08.2020 13:50
-
Asahimura05.07.2020 19:49
-
Kolyabu09.03.2021 16:30
-
Юля590027405.11.2021 13:59
-
5760124.04.2023 07:54
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.