Программа ABCpascal: Ввести с клавиатуры два числа, если произведение этих чисел...

Question

Программа ABCpascal: Ввести с клавиатуры два числа, если произведение этих чисел положительно, то найти их разность, а иначе найти их деление.

Comments

Так что, не выдумывайте, уважаемый "хелпмеплезе"

---

Ну наверное проблемы, просто я долго отсутствовал поэтому пишу сюда

---

Был бы очень благодарен

---

Не проблема

---

Спасибо, мне нужно pascalABC.net програма так называется

---

Нет, совершенно. Pascal ABC - это Winsows-версия языка Turbo Pascal, проект, закрытый ровно 10 лет назад. PacalABС.NET - совершенно другой язык.

---

Ну я знаю что pascalABC

---

эммм. разве не одно и тоже?

---

Не могу. Нет такого языка ABCpascal. Либо Pascal ABC, либо PascalABC.NET

---

Помогите мне пожалуйста

Answer 1

PascalABC.NET 3.4.2, сборка 1837 от 11.10.2018

Внимание! Если программа не работает, обновите версию!

begin

 var (a, b) := ReadReal2;

 if a * b > 0 then Println(a - b)

 else Println(a / b)

end.

---

---

Comments

Это простор НИЧЕГО. Такой же атавизм в языке, как аппендикс у человека. Был введен автором языка Н.Виртом в связи с требованиями конкретной ЭВМ в 1971 году. Последняя версия языка, где еще какой-то смысл был в Program - это TurboPascal. Но этот диалект умер в 1994 году с выходом Дельфи.

---

Ага

---

Это лучше, чем Program Vasya;

---

// Эту программу написал я, Вася

---

Вы можете с таким же успехом просто писать комментарий

---

Пожалуйста

---

Ух, спасибо

---

*просто НИЧЕГО

---

то есть это просто название?

---

Добавил Вам фрагмент из Справки по языку