Задать вопрос
25 августа, 10:48

Напишите программу на паскале

А. выясните какие числа ввел пользователь: положительное или отрицательное?

Б. выясните какие числа ввел пользователь: четное или нечетное?

+4
Ответы (1)
  1. 25 августа, 11:03
    0
    Var x:integer;

    begin

    writeln ('Введите число') ;

    readln (x) ;

    if x>0 then write ('Число положительное и ')

    else write ('Число отрицательное и ') ;

    if x mod 2=0 then write ('четное.')

    else writeln ('нечетное') ;

    end.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Напишите программу на паскале А. выясните какие числа ввел пользователь: положительное или отрицательное? Б. выясните какие числа ввел ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы
Похожие вопросы по информатике
Составить программу в паскале Ввести число. Если оно четное и положительное, разделить его на 4, если четное и отрицательное - умножить на 5, если нечетное - возвести в квадрат.
Ответы (1)
Задача 1 - Дано целое число. Если оно положительное, вывести " Число положительное ", если отрицательное вывести "Число отрицательное ", если равно 0 - "Число равно нулю" задача 2 - дано целое число.
Ответы (1)
Паскаль. Составить программу введённого пользователем числа (целое или нет; положительное, отрицательное или нуль; чётное или нечётное)
Ответы (1)
Написать программу в паскале: определить, четное число или нечетное, если четное - разделить на два и вывести результат на экран
Ответы (1)
Напишите программу вывода на экран фразы "Число положительное", если введенное число положительное, и "Число отрицательное", если введенное число отрицательное.
Ответы (1)