Задать вопрос
2 марта, 21:39

Даны два числа X и Y. Если их произведение больше 20, то найти их сумму, иначе найти их разность. Вывести результат.

+1
Ответы (1)
  1. 2 марта, 21:56
    0
    Var x, y, z:real;

    begin

    readln (x) ;

    readln (y) ;

    if x*y>20 then z:=x+y else z:=x-y;

    writeln (z) ;

    end.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Даны два числа X и Y. Если их произведение больше 20, то найти их сумму, иначе найти их разность. Вывести результат. ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы
Похожие вопросы по информатике
Задача 1 - Дано целое число. Если оно положительное, вывести " Число положительное ", если отрицательное вывести "Число отрицательное ", если равно 0 - "Число равно нулю" задача 2 - дано целое число.
Ответы (1)
Дано два числа. Если их сумма кратна 5, то прибавить 1, иначе вычесть 2. Результат вывести на экран. Дано два числа. Если их сумма кратна 5, то прибавить 1, иначе вычесть 2. Результат вывести на экран. Написать на языке Packal
Ответы (1)
Даны два числа. Вычислить их сумму. Если она превышает 1000, то вычислить и вывести квадрат. первого числа, иначе-вычислить и вывести куб второго числа
Ответы (1)
Помогите с ИКТ, 9 класс, Паскаль! #1 Ввести число, если оно отрицательное, найти его квадрат и вывести результат, иначе вывести на экран число положительное. #2 Ввести значение Х, вычислить значение Z, где Z=Х^2 (Х во второй степени) при х >0.
Ответы (1)
Используя условный оператор if написать конструкцию которая проверяет возраст и выводит соответствующие значения по такому словию: Если возраст больше либо равен 18 - вывести сообдение "ok" иначе если возраст больше 14 - вывести сообдение "with
Ответы (1)