Составить алгоритм и написать программу к задаче: с клавиатуры вводится число. Определить...

Question

Составить алгоритм и написать программу к задаче: с клавиатуры вводится число. Определить является ли оно отрицательным.

Answer 1

Ответ:

Var

A: integer;

Begin

Write('Введите любое число:'); Readln(A);

If A<0 then Write('Отрицательное число') else Write('Положительное');</p>

Readln;

End.

Объяснение:

Comments

Write("Введите любое число:"); Readln(A); lf`n jib,re

---

даёт ошибку*

---

Именно какую?

---

Program1.pas(8) : Неожиданный символ '"'

---

Я исправил

---

Я кавычки не те поставил в первый раз