• Составить программу которая возводит в квадрат остаток от целочисленного деления числа а на 15 и выводит результат

Ответы 5

  • *не div, а mod
  • Program Program2;var   X:Integer;begin  ReadLn(X);  WriteLn(sqr(X mod 15));end.
  • C и D - абсолютно лишние переменные, по большому счёту 1-й достаточно
  • ++
    • Автор:

      brewer
    • 6 лет назад
    • 0
  • Program Program1;var  A,B:Integer;  C,D:Real;Begin  ReadLn(A);  B:=A mod 15;  C:=sqr(B);  WriteLn(C);End.
    • Автор:

      webb
    • 6 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

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

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

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