Соператора паскаля for вывести на экран: 1) все четные числа из диапазона от a до b, кратные трем (a 2) все двузначные числа, в которых старшая цифра отличается от младшей не больше чем на 1; 3) все трехзначные числа, в которых хотя бы две цифры повторяются.

212

437

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

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

tatyanabelousova

Информатика

4,4(40 оценок)

1) var i,a,b: longint; begin read(a,b); for i: =a to b do if (i mod 3=0) then write(i,' '); writeln; end. 2) var i: longint; begin for i: =10 to 99 do if (abs(i mod 10 - i div 10)< =1) then write(i,' '); writeln; end. 3) var i,s,f,t: longint; begin for i: =100 to 999 do begin f: =i div 100; s: =i div 10 mod 10; t: =i mod 10; if (f=s) or (f=t) or (s=t) then write(i,' '); end; writeln; end.

mashka710

Информатика

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

Var i, sum, j: integer; begin j: =1; sum: =0; while j< 15 do begin sum: =sum+(j*j*j); j: =j+2; end; write(sum); end.

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

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

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

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

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

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

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

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

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

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