Question

Tính tổng số đồng tiền được thả vào bàn cờ, biết:

+ Bàn cờ có 64 ô.

+ Ô đầu tiên, ta thả vào 1 đồng tiền.

+ Các ô còn lại, ta thả đồng tiền vào theo qui ước ô tiếp theo có số lượng đồng tiền gấp đôi ô trước đó.

Mọi người giúp em với ạ.

Answer 1

uses crt;
var lt:real;
i,n,x:integer;
begin
clrscr;
x:=2;
n:=64;
lt:=1;
for i:=1 to n do
lt:=lt*x;
writeln('ket qua la: ',lt-1:4:2);
readln;
end.