1. Из полностью наполненной цистерны, ёмкостью S литров, начинает выливаться вода. В каждую секунду из бочки выливается 6% находящейся в бочке воды. Сколько литров воды останется в бочке через 20 секунд.
Ответы на вопрос
Ответил Аноним
0
Код Pascal:
Var
S:real;
i:byte;
Begin
Write('S = ');ReadLn(S);
For i:= 1 to 20 do
S:=S*0.94;
WriteLn(S:0:3)
End.
Var
S:real;
i:byte;
Begin
Write('S = ');ReadLn(S);
For i:= 1 to 20 do
S:=S*0.94;
WriteLn(S:0:3)
End.
Новые вопросы