
Пользоавтель вводит число целое число. Надо вывести на экран сколько в этом числе цифр и
положительное оно или отрицательное. Например, "это однозначное положительное число". в паскале

Ответы на вопрос




В Паскале можно написать программу, которая будет принимать от пользователя целое число, а затем определять, сколько в этом числе цифр и является ли оно положительным или отрицательным.
Вот пример такой программы на языке Паскаль:
``` program CheckNumber; var number: integer; digits: integer; begin // Ввод числа от пользователя writeln('Введите целое число: '); readln(number); // Определение количества цифр в числе digits := 0; if number = 0 then digits := 1 else begin while number <> 0 do begin digits := digits + 1; number := number div 10; end; end; // Проверка положительности или отрицательности числа if number > 0 then writeln('Это положительное число с ', digits, ' цифрами.') else if number < 0 then writeln('Это отрицательное число с ', digits, ' цифрами.') else writeln('Это нулевое число.'); end. ```
Пользователю будет предложено ввести целое число. Затем программа будет определять количество цифр в числе с помощью цикла while. Если число равно нулю, то в нем считается 1 цифра. Затем программа проверяет, является ли число положительным, отрицательным или нулевым, и выводит соответствующее сообщение на экран.
Например, если пользователь введет число 123, программа выведет "Это положительное число с 3 цифрами". Если пользователь введет число -45, программа выведет "Это отрицательное число с 2 цифрами". Если пользователь введет число 0, программа выведет "Это нулевое число".


Топ вопросов за вчера в категории Информатика
Последние заданные вопросы в категории Информатика
-
Математика
-
Литература
-
Алгебра
-
Русский язык
-
Геометрия
-
Английский язык
-
Химия
-
Физика
-
Биология
-
Другие предметы
-
История
-
Обществознание
-
Окружающий мир
-
География
-
Українська мова
-
Информатика
-
Українська література
-
Қазақ тiлi
-
Экономика
-
Музыка
-
Право
-
Беларуская мова
-
Французский язык
-
Немецкий язык
-
МХК
-
ОБЖ
-
Психология
-
Физкультура и спорт
-
Астрономия
-
Кыргыз тили
-
Оʻzbek tili