Легенда о происхождении шахмат: мудрец попросил у раджи плату: за первую клетку доски - 1 рисовое зерно, за каждую следующую - вдвое больше, чем за предыдущую. написать программу, подсчитывающую количество зёрен, которое раджа должен был заплатить всего за первые 20 клеток шахматной доски.

Program radga;var count: integer; i: integer;begin count := 1; for i:= 1 to 20 do   begin     count:= count * 2;   end;   writeln(count);end.
вроде так, не понял одно: нужно было умножать или добавлять так что попробовал умножить)