Số dầu trong thùng là :

\(16\div\left(7+1\right)\times7=14\left(kg\right)\) 

Đáp số : 14 (kg)

đùa tui à mấy bài này mà không biết làm

program bai1;

var i,a,n,s,t:longint;

f1,f2:text;

function amux(a,x:longint):longint;

var s,i:longint;

begin

s:1;

for i:=1 to x do

s:=s*a;

amux:=s;

end;

begin

assign(f1,'bai1.inp';reset(f1);

assign(f2,'bai1.out');rewrite(f2);

read(f1,a);readln(f1,n);

s:=0;

for i:=1 to n do

begin

t:=amux(a,i);

s:=s+t;

end;

write(f1,s);

close(f1);close(f2);

end.

Xin đề thi HSG tin 9 cấp tỉnh......Đề nhiều câu khó càng tốt....

Thanks trước