• написать программу которая сравнивала бы его с 0 и положительное число увеличила в 2 раза а отрицательное увеличила бы в 3

Ответы 4

  • Program If0;Vara,b,c:Integer;Begin WriteLn('Ввести отрицательное или положительное число');ReadLn(a);If a>0Then b:=a*2 Else b:=a*3;Write(b);End.
    • Автор:

      dawson
    • 6 лет назад
    • 0
  • Вот так чище будет
    • Автор:

      bud14
    • 6 лет назад
    • 0
  • СПАСИБО)
    • Автор:

      brogan
    • 6 лет назад
    • 0
  • Незачто,   если что обращайся
  • Добавить свой ответ

Войти через Google

или

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

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

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