Дана последовательность натуральных 3-х значных чисел, за которой следует 0. составить программу поиска в данной последовательности элемента, сумма цифр которого равна n делать программу через цикл while

274

306

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

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

Izilaevapolina

Информатика

4,6(91 оценок)

Var k: array[1..100] of integer; a,n,i,c: integer; begin c: =0; i: =1; a: =999; write('введите n: '); readln(n); writeln('введите a: '); while a< > 0 do beginr eadln(a); if (a> =100) and (a< =999) then begin if ((a div 100)+((a div 10) mod 10)+(a mod 10))=n then begin k[i]: =a; i: =i+1; c: =c+1; end; end; end; if c> 0 then begin writeln('числа, сумма цифр которых равна ',n,': '); for i: = 1 to c do writeln(k[i]); end; end.

nadir7207

Информатика

4,8(66 оценок)

Var a,s,p: real; begin a: =8.5; s: =0; while a< =40.9+0.005 do begin s: =s+a; a: =a+0.1; end; writeln('s = ',s: 6: 2); p: =1; a: =1; while a< =3+0.005 do begin p: =p*a; a: =a+0.25; end; writeln('p = ',p: 6: 2); if s> p then writeln('сумма больше') else writeln('произведение больше'); end. результат: s = 8027.50 p = 304.54 сумма больше

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

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

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

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

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

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

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

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

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

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