Вычисление степени целого числа

Напишите программу, вычисляющую 2^N.

Входные данные
Вводится целое неотрицательное число N, которое не превосходит 30.

Выходные данные
Выведите число 2^N.

Исходный код на языке Pascal
program pow;

var
  n, i, s: integer;

begin
  read(n);
  s := 1;
  for i := 1 to n do
    s := s * 2;
  writeln(s);
end.