По инфе все надо написать используя цикл repeat используя цикл с пост условием 1) посчитать сумму всех нечетных чисел от 230 до 430 2) вычислить квадратные корни из чисел : 900, 893, 886, 879 до тех пор пока это можно делать 3) найти сумму чисел шести значного числа

167

172

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

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

DarthTyranus

Информатика

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

1) посчитать сумму всех нечетных чисел от 230 до 430 // pascalabc.net 3.0, сборка 1088 var i,s: integer; begin i: =231; s: =0; repeat s: =s+i; i: =i+2 until i> 400; writeln('сумма нечетных чисел на интервале [230; 400]: ',s) end. результат выполнения программы: сумма нечетных чисел на интервале [230; 400]: 26775 2) вычислить квадратные корни из чисел : 900, 893, до тех пор пока это можно делать // pascalabc.net 3.0, сборка 1088 var i: integer; begin i: =900; repeat write('(',i: 3,',',sqrt(i): 9: 5,') '); i: =i-7 until i< 0; writeln; end. результат выполнения программы: (900, 30.00000) (893, 29.88311) (886, 29.76575) (879, 29.64793) (872, 29.52965) (865, 29.41088) (858, 29.29164) (851, 29.17190) (844, 29.05168) (837, 28.93095) (830, 28.80972) (823, 28.68798) часть строк пропущена (130, 11.40175) (123, 11.09054) (116, 10.77033) (109, 10.44031) (102, 10.09950) ( 95, 9.74679) ( 88, 9.38083) ( 81, 9.00000) ( 74, 8.60233) ( 67, 8.18535) ( 60, 7.74597) ( 53, 7.28011) ( 46, 6.78233) ( 39, 6.24500) ( 32, 5.65685) ( 25, 5.00000) ( 18, 4.24264) ( 11, 3.31662) ( 4, 2.00000) 3) найти сумму чисел шестизначного числа// pascalabc.net 3.0, сборка 1088 var n: longint; s: integer; begin write('n='); read(n); repeat s: =s + (n mod 10); n: =n div 10 until n=0; writeln('сумма цифр числа равна ',s) end. тестовое решение: n=472305 сумма цифр числа равна 21

mila320

Информатика

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

Существует гениальный способ нахождения чисел в двоичном варианте, называется пальцы. можете найти в интернете, вам там быстро и понятно объяснят. так же можно это сделать : считаем количество разрядов. и получаем следующее: заметьте, что количество разрядов равно 9, но степень двоек идет от 8 до 0. т.е по закону - где n вначале 9, потом 8 потом 7 и т.д.

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

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

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

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

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

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

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

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

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

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