150 баллов, господа. Решите задачу в Паскале с помощью ПРОЦЕДУР: В 1626г индейцы продали остров Манхэттэн за 20 долларов. Если бы деньги были помещены в банк и прирост составлял бы n%, то каков был бы их капитал в текущем году?
Answers & Comments
quickboy
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.
Answers & Comments
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.