Царевна-лягушка съедает ежедневно на 20 комаров больше, чем в предыдущий день, и еще 2 комара. Выведите на экран, через сколько дней количество съеденных комаров превысит 100. Количество съеденных комаров в первый день задать random, в пределах 20. Решить в паскале.
More Questions From This User See All
Answers & Comments
Ответ:
var d:integer;
k:real;
begin
d:=1;
k:=12;
while k<=30 do
begin
d:=d+1;
k:=int(k*1.2)+2
end;
writeln(d)
end.
Объяснение:
.