Дано целое число a. Если оно является неположительным, то прибавить к не му 1,иначе...

Question

Дано целое число a. Если оно является неположительным, то прибавить к не му 1,иначе увеличить в 2 раза. В Pascal​

Answer 1

// PascalABC.NET

begin

 var a := ReadInteger;

 if a <= 0 then</strong>

   a += 1

 else

   a *= 2;

 Print(a)

end.

Comments

Спасибо

---

Пожалуйста

---

Добрый, мы только начали C# в этом семестре и то, что там в задании будем на 4 курсе учить. Так что не смогу помочь с этим.

---

Мы инженеры-технари, а не программиисты, у нас основное - это Фортран-95 для технических расчетов, все предметы на нем. На первом Паскаль учили.