Question

Записать на языке Паскаля:
алг Задача-6
вещ Х
нач
ввод Х
если Х<0
то вывод "отрицательное число"
иначе вывод "положительное число"
кв
кон

Answer 1

var x:real;
begin;
readln(x);
if x<0 then write('отрицательное число') else write('положительное число');
end.

Answer 2

Так и писать:" Отрицательное число."?

Answer 3

Какая версия Паскаля? В алгоритме написано вывести это, я и вывел.