Question

Величина х-положительная
Величина х-отрицательная
Запись на языке паскаль

Answer 1

var a:integer;
begin
read(a);
if (a>=0) then write('+') else write('-');
end.