Hướng dẫn lập trình Pascal bài Chữ số: Cho biết K chữ số cuối cùng của M mũ N

Hướng dẫn lập trình Pascal bài Chữ số: Cho biết K chữ số cuối cùng của M mũ N. Ví dụ : 1 chữ số cuối của 12 mũ 3 . Có 12 mũ 3 = 1728 nên đáp án là 8. Yêu cầu: File vào (CHUSO.INP): gồm 1 dòng, có 3 chữ số: M; N; K cách nhau 1 khoảng cách. M: là cơ số N: là số mũ của cơ số M K: là số chữ số cuối cùng muốn biết File ra (CHUSO.TXT): gồm 1 chữ số là K chữ số cuối cùng của M mũ N.

Bài: Chữ Số

Đề: Cho biết K chữ số cuối cùng của MN

Ví dụ : 1 chữ số cuối của 123 Có 123 = 1728 nên đáp án là 8

Yêu cầu:

 File vào: gồm 1 dòng, có 3 chữ số: M; N; K cách nhau 1 khoảng cách

M: là cơ số

N: là số mũ của cơ số M

K: là số chữ số cuối cùng muốn biết

 File ra: gồm 1 chữ số là K chữ số cuối cùng của MN

Chương trình

Program chuso;

var m,k,n,t,i:longword;

s:string;

f, g:text;

begin

assign(f,'d:\chuso.inp');

reset(f);

assign(g,'d:\chuso.txt');

rewrite(g);

read(f,m,n,k);

t:=1;

for i:=1 to n do

t:=t*m;

str(t,s);

writeln(g,copy(s,length(s)-k+1,k)); close(f); close(g);

end