Написать программу, которая запрашивает ввод целого числа и выводит на экран сообщение, положительное это число или нет

12.04.2013, 18:10. **Показов** 15584. **Ответов** 2

Написать программу, которая запрашивает ввод целого числа и выводит на экран сообщение, положительное это число или нет (0- ни положительное, ни отрицательное число).

@Nimo · 12.04.2013, 18:32

Пишу общее представление кода.

Pascal

Readln(Number);
If (Number = 0) Then Write('0 - ни положительное, ни отрицательное число');
If (Number > 0) Then Begin
Write('Положительное число'); End
 Else Begin
Write('Отрицательное число'); End;

@Mishania · 12.04.2013, 18:35

Можно, например, так:

Pascal

Program Primer1;
var
   N: integer;
begin
     Write('Vvedite chislo N:');
     Readln(N);
     If N=0
           then Writeln('N Raven nulyu')
           else
     If N>0
           then Writeln('N bolshe nulya')
           else Writeln('N menshe nulya');
     Readln;
end.

liubov29
		1
	Написать программу, которая запрашивает ввод целого числа и выводит на экран сообщение, положительное это число или нет 12.04.2013, 18:10. Показов 15584. Ответов 2 Метки нет (Все метки) Написать программу, которая запрашивает ввод целого числа и выводит на экран сообщение, положительное это число или нет (0- ни положительное, ни отрицательное число).

Опции темы

Написать программу, которая запрашивает ввод целого числа и выводит на экран сообщение, положительное это число или нет

Решение