18 февраля, 02:39

Заданы два числа. Вывести сообщение, положительным или отрицательным является каждое из чисел. паскаль

0
Ответы (1)
  1. 18 февраля, 04:29
    0
    var a, b: real;

    begin

    write ('Введите число a: ');

    readln (a);

    write ('Введите число b: ');

    readln (b);

    if (a>0) then writeln ('Число a является положительным') else writeln ('Число a является отрицательным');

    if (b>0) then writeln ('Число b является положительным') else writeln ('Число b является отрицательным');

    readln;

    end.
Знаешь ответ?
Не уверен в ответе?
Найди верный ответ на вопрос ✅ «Заданы два числа. Вывести сообщение, положительным или отрицательным является каждое из чисел. паскаль ...» по предмету 📙 Информатика, а если ответа нет или никто не дал верного ответа, то воспользуйся поиском и попробуй найти ответ среди похожих вопросов.
Искать другие ответы