На двух первых днях рождениях у пяточка винни-пух съел всего 100г пищи.составить програму ,которая определяет,сколько килограммов пищи съест винни-пух на 15 дне рождении,если на каждом следующим дне рождении он съедает столько сколько на предыдущих.обрати внимание что граммы надо образовать в кг.
Написал программу на Паскале. с расширением pas.
var
a:array[2..14] of integer;
i:byte;
begin
a[2]:=100;
for i := 3 to 14 do
a[i]:=a[i-1]*2;
writeln(a[14] div 1000,',',a[14] mod 1000,'кг');
readln;
end.