• Паскаль. Напишите программу, которая по последней цифре числа определяет последнюю цифру квадрата этого числа

Ответы 2

  • var a, b: longint;beginwrite ('введите число -> ');readln (a);a:=a mod 10;b:=(a*a) mod 10;writeln ('последняя цифра квадрата числа -> ',b);end.
    • Автор:

      braxton
    • 6 лет назад
    • 0
  • var i: Integer; begin  write('Число: ');  readLn(i);  i := i mod 10;  writeLn('Цифра квадрата = ',  sqr(i) mod 10); end.
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years