• Дано целое число n . увеличить его в 3 раза если число положительное. Построить блок-схему и написать программный код на языке Паскаль.

Ответы 1

  • program p1;var n:integer;begin Writeln ('Введите число');Readln (n);if n>0 Then a:=(n*3) and (n mod 2=0) Else;  Writeln (n);Readln;End. не точно нужно дополнить,но что-то типо этого
    • Автор:

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

Войти через Google

или

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

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

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