Question

PASCAL
в первый день спортсмен пробежал x км в каждый следующий на 12 % больше. ск-ко км за n-день?

Answer 1

var i,n:integer;
x:real;
begin
read(x,n);
for i:=2 to n do
x:=x*1.12;
write(x);
end.

Answer 2

программа протестирована на PascalABC

7fe0968c4be3549cf546a773a0766b97.txt

a543adff0e88ec022b64bbcf65fd9774.txt