Bài 17: Chương trình con và phân loại

LQ

ĐỐ VUI:

Tính \(a^n\%p\left(a\le100|n,p\le10^9\right)\)(% = mod)

Example:

Inp: 3 5 100

Out: 43.

Chúc các bạn học tốt nha.

ML
20 tháng 3 2020 lúc 19:54

Program hotrotinhoc;

var a: byte;

i,n,p: longint;

t: int64;

begin

readln(a,n,p);

t:=1;

for i:=1 to n do

t:=t*a;

write(t mod 100);

readln

end.

Bình luận (0)
 Khách vãng lai đã xóa
NT
21 tháng 3 2020 lúc 11:14

uses crt;
var a,n,p,t,kq:int64;
i:longint;
begin
clrscr;
write('a='); readln(a);
write('n='); readln(n);
write('p='); readln(p);
t:=1;
for i:=1 to n do
t:=t*a;
kq:=t mod p;
writeln('KQ=',kq);
readln;
end.

Bình luận (0)
 Khách vãng lai đã xóa

Các câu hỏi tương tự
LH
Xem chi tiết
LH
Xem chi tiết
LH
Xem chi tiết
LH
Xem chi tiết
LH
Xem chi tiết
PL
Xem chi tiết
DT
Xem chi tiết
PL
Xem chi tiết
PL
Xem chi tiết