С цикла For
Через pascal
Составить программу: Маленький обжора съедает ежедневно на 20 конфет больше, чем в предыдущий день и ещё 2 конфеты. Вывести
на экран, через сколько дней количество съеденных конфет превысит 100, если в первый день съедено 12 конфет
На каком языке?
Если basic тогда так:
private sub objora
dim x as integer
dim den as integer
x=12
den = 0
do
x=x+20+2
den = den + 1
loop while x>100
msgbox(den)
end sub
Объяснение: