Информатика, опубликовано 2018-08-22 21:37:03 by Гость
дано число. если это число положительное,то вывести что оно положительное.в противном случае вывести,что оно отрицательное
Ответ оставил Гость
Var a:integer;
begin
readln(a);
if a>0 then writeln(Число положительное)
else writeln(Число отрицательное);
end.
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.