Задать вопрос
3 февраля, 23:00

Введите с клавиатуры два числа a и b. Если оба числа четные, то вычислите их сумки выведите результат на экран. если оба нечетные то найдите

произведение этих чисел и выведите результат. Иначе, увеличить все числа в пять раз и выведите результаты. Решение, которое уже есть на сайте не писать

+4
Ответы (1)
  1. 4 февраля, 01:25
    0
    Var

    a, b, c:integer;

    begin

    readln (a, b) ;

    If (a mod 2 = 0) and (b mod 2 = 0) then

    begin

    c:=a+b;

    writeln ('Сумма = ', c) ;

    end

    else

    if (a mod 2 = 1) and (b mod 2 = 1) the

    begin

    c:=a*b;

    writeln ('Произведение = ', c) ;

    end

    else

    begin

    a:=a*5;

    b:=b*5;

    writeln ('A=', a,' B = ', b) ;

    end; end.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Введите с клавиатуры два числа a и b. Если оба числа четные, то вычислите их сумки выведите результат на экран. если оба нечетные то ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы
Похожие вопросы по информатике
Паскаль: с Для четырех произвольных чисел, введенных с клавиатуры, выведите на экран соответствующие результаты. Если произведение этих чисел положительно, то выведите утроенное значение каждого числа.
Ответы (1)
Для четырех произвольных чисел, введенных с клавиатуры, выведите на экран соответствующие результаты. Если произведение этих чисел положительно, то выведите утроенное значение каждого числа.
Ответы (1)
Для пяти произвольных чисел, введенных с клавиатуры, выведите на экран соответствующие результаты. Если первое, второе и пятое числа отрицательны, то выведите их произведение.
Ответы (1)
1. В языке PHP создайте генератор случайного числа от 1 до 10. Выведите результат выполнения на экран любым способом. 2. Если полученное случайное число четное, выведите на экран слово "четное", иначе выведите на экран слово "нечетное". 3.
Ответы (1)
Введите с клавиатуры три числа x, y, z. если числа равны, то увеличте их в три раза и выведите результат на экран. Если равны только два последние числа то замените все числа на противоположные и выведите результаты.
Ответы (1)