Задать вопрос Регистрация
Помочь другим

  • записать программу данного числа возведенного в куб если оно четное или увеличить на 3 если оно нечетное

Ответы 1

  • Пожалуйста:

     

    program Pr1;var a,y,z:integer;x:real;beginreadln(a);if a mod 2 = 0 then begin x := exp(3*ln(a)); writeln(x:8:3); endelse begin a := a+3; writeln(a); end;end.

  • Добавить свой ответ

Еще вопросы

Топ пользователей

Войти через Google

 или

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

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

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