Viết thuật toán: 1)Tính x^y 2) Tính a! Giúp mình đi mng

Bài 1:

Bước 1: Nhập x, y từ bàn phím

Bước 2: s <-1;

Bước 3: i<-1 to y

s <- s*x

Bước 4: Xuất s ra màn hình

Bài 2:

Bước 1: Nhập a từ bàn phím

Bước 2: s<-1;

Bước 3: i<-1 to a

s <- s*i;

Bước 4: Xuất s ra màn hình