Написать программу, позволяющую по последней цифре числа определить последнюю цифру его квадрата. Язык программирования VBA
Написать программу, позволяющую по последней цифре числа определить последнюю цифру его квадрата.
Язык программирования VBA
Гость
Ответ(ы) на вопрос:
ГостьSub aaa()
n = InputBox("Введите число")
d = (CInt(Right(n, 1))) ^ 2 Mod 10
MsgBox "Последняя цифра квадрата последней цифры числа " + n + "=" + CStr(d)
End Sub
Не нашли ответ?
Похожие вопросы