15 lines
175 B
Plaintext
15 lines
175 B
Plaintext
BEGIN
|
|
N := READ;
|
|
P := READ;
|
|
|
|
S := 1;
|
|
|
|
WHILE P > 0 DO
|
|
S := S * N;
|
|
P := P - 1
|
|
OD;
|
|
|
|
WRITE(S)
|
|
END
|
|
|