Дано два целых положительных числа a и b . Требуется написать программу, которая находит цифру, на которую оканчивается число a^b.
Ответы
Ответ дал:
0
Pascal ABC
Var A,B,C:integer;
Begin
C:=1;
Write('A = ');ReadLn(A);
Write('B = ');ReadLn(B);
For B:= 1 to B do
C:=C*A;
WriteLn(C mod 10);
End.
Var A,B,C:integer;
Begin
C:=1;
Write('A = ');ReadLn(A);
Write('B = ');ReadLn(B);
For B:= 1 to B do
C:=C*A;
WriteLn(C mod 10);
End.
Вас заинтересует
2 года назад
8 лет назад
10 лет назад