создать программу позволяющую по последней цифре данного числа определить последнюю цифру куба этого числа
Ответы на вопрос
Ответил Аноним
0
var
n:integer;
begin
Write('n='); Read(n);
n:=Abs(n); { защита от злобных буратинок, любящих минусы }
n:=n mod 10;
n:=n*n*n mod 10;
Writeln('Последняя цифра куба этого числа равна ',n)
end.
Пример
n=352421137
Последняя цифра куба этого числа равна 3
n:integer;
begin
Write('n='); Read(n);
n:=Abs(n); { защита от злобных буратинок, любящих минусы }
n:=n mod 10;
n:=n*n*n mod 10;
Writeln('Последняя цифра куба этого числа равна ',n)
end.
Пример
n=352421137
Последняя цифра куба этого числа равна 3
Новые вопросы