дано число. если это число положительное,то вывести что оно положительное.в неприятном

дано число. если это число положительное,то вывести что оно положительное.в неприятном случае вывести,что оно отрицательное

Задать свой вопрос
Боря Микиртичев
а если одинаковое нулю?
Тамара
вывести, что оно отрицательное?
Яна Кропильницкая
ага
Камилла
Но почему не рассматриваем случай, если число равно нулю??
2 ответа
Var a: integer;
begin
readln(a);
if agt;0 then
writeln('число положительное');
if alt;0 then
writeln('число отрицательное);
end.




Что делать в случае, если число одинаково 0?
Олежка Сенигубов
вывести,что отрицательное
Тамара Филиненкова
тогда решение Sky09 знатный умник верное, а мое - нет
Var a:integer;
begin
  readln(a);
  if agt;0 then writeln('Число положительное')
    else writeln('Число отрицательное');
end.
Ванька Возвыщаев
спасииииибо огромное
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт