ТутРешу.Ру

1) Составьте программу, которая определяет…

Задание:

1) Составьте программу, которая определяет, сколько слагаемых должно быть в сумме 1+2+3+4+… , чтобы сумма была больше 20! Через операторWHILE!

Решение:

var i,sum: integer; beginwhile sum<20 do begini: =i+1; sum: =sum+i; end; writeln (i); end.




Знаете другой ответ?

Отправить свой ответ