Напишите программу вывода на экран фразы “Число положительное”, если введенное число
положительное, и “Число отрицательное”, если введенное число отрицательное. Помогите пожалуйста я пытался сделать не получалось
положительное, и “Число отрицательное”, если введенное число отрицательное. Помогите пожалуйста я пытался сделать не получалось
More Questions From This User See All
Answers & Comments
Verified answer
//PascalABC.NET//Версия 3.3, сборка 1634
begin
var a:=ReadReal('Введите число:');
if a>0 then write('Число положительное')
else if a<0 then write('Число отрицательное');
end.