150 , господа. решите в паскале с процедур: в 1626г индейцы продали остров манхэттэн за 20 долларов. если бы деньги были помещены в банк и прирост составлял бы n%, то каков был бы их капитал в текущем году?
Program money; var n,x:real; procedure count(percent:real); begin for var i:=1626 to 2014 do x:=x+x*(percent / 100); end; begin x:=20; readln(n); count(n); writeln(x,' долларов '); end.
var n,x:real;
procedure count(percent:real);
begin
for var i:=1626 to 2014 do x:=x+x*(percent / 100);
end;
begin
x:=20;
readln(n);
count(n);
writeln(x,' долларов ');
end.