Мальчик учит англ слова. в первый день он выучил 10 слов, каждый следующий день он учил на 5 слов больше, чем в предыдущий. через сколько дней словарный запас мальчика будет более 120 слов
Var S,i:integer;
begin
i:=1;
S:=10;
While S<=120 do
begin
S:=S+(10+i*5);
i:=i+1;
end;
Writeln(На ,i, день);
end.
Оцени ответ
