В первый день пловец проплыл 3км. В каждый последующий день он проплывал на 10% больше, чем в предыдущий. К какому дню он проплывет (суммарно) более 30 км?
Программа Pascal.
Ответы
Ответ дал:
0
нет компилятора чтобы проверить на ошибки, поэтому перепроверь сам на компьютере. Думаю, пойдёт так:
program plov ;
var day : integer ;
var km , sum : real ;
begin
day := 1 ;
km := 3 ;
sum := km ;
while ( sum <= 30 ) do begin
day := day + 1 ;
km := km * 1.1 ;
sum := sum + km ;
end ;
writeln ( 'day=' , day ) ;
end.
Должно, как я думаю, получиться в ответе 8-й день.
Отпиши что получится, ладно? Мне самому интересно.
program plov ;
var day : integer ;
var km , sum : real ;
begin
day := 1 ;
km := 3 ;
sum := km ;
while ( sum <= 30 ) do begin
day := day + 1 ;
km := km * 1.1 ;
sum := sum + km ;
end ;
writeln ( 'day=' , day ) ;
end.
Должно, как я думаю, получиться в ответе 8-й день.
Отпиши что получится, ладно? Мне самому интересно.
Вас заинтересует
1 год назад
1 год назад
6 лет назад
6 лет назад
8 лет назад
8 лет назад
9 лет назад