Паскаль. вычислить сумму чисел, оканчивающихся на 3, на отрезке [13,75], вычислить сумму чисел кратных 3 на отрезке [13,75]. сравнить полученные суммы и вывести сообщение о том что больше

251

403

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

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

isanatoliy25199

Информатика

4,7(50 оценок)

var i, sum1, sum2: integer;

begin

sum1: = 0;

sum2: = 0;

for i: = 13 to 75 do

if i mod 10 = 3 then

sum1: = sum1 + i

else if i mod 3 = 0 then

sum2: = sum2 + i;

if sum1 > sum2 then writeln("первая сумма больше") else

if sum2 > sum1 then writeln("вторая сумма больше");

end.

алькамалька

Информатика

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

если переменная нужна целая то так:

x: =random(b-a)+a

если можно дробную, то так

x: =(b-a)*random+a

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

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

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

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

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

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