решите задачу на Pascale через Integer.
Задача
На до возвести 2 в степень.
Например 2 в 5 =32
Например 2 в 3=8

Код программы приведен ниже и во вложениях.var   n: integer;  // степень числа  res: integer; // результат  idx: integer; // индекс для циклаbegin  write('Введите степень числа: ');  readln(n);  res := 1;  if n < 0 then  begin    writeln('Степень должна быть неотрицательной.');    halt(-1); // завершение программы  end  else if n >= 30 then  begin    writeln('Переполнение типа Integer.');    halt(-2);  end  else if n > 0 then  begin    for idx := 1 to n do      res := res * 2;  end;  writeln('Результат возведения 2 в степень ', n, ': ', res, '.');end.