Программисты, помогите! нужно написать программу на паскале. дано натуральное число n. Возвести в степень n число 2. С Longint и integer.

Question

Охун

16 мая, 02:06

+2

Ответы (2)

Знаете ответ?

Диамид · Answer 1

Var

n, i: longint;

a: int64;

begin

readln (n) ;

a : = 2;

for i : = 2 to n do

a : = a * 2;

writeln (a) ;

end.

Лячын · Answer 2

Program z1;

var a, n:longint;

c:real;

begin

writeln ('Введите N=') ;

read (n) ;

a:=2;

c:=power (a, n) ;

writeln (c) ;

end.