Question

Написать текст программы _______________________

Answer 1

#include <iostream>

int main()
{
    int A, B;
    setlocale(LC_ALL, "RUSSIAN");
    std::cout << "Введите A >> ";
    std::cin >> A;
    std::cout << "Введите B >> ";
    std::cin >> B;

    std::cout << "Сумма A+B: " << A + B << std::endl;
    std::cout << "Разность A-B: " << A - B << std::endl;
    std::cout << "Разность B-A: " << B - A << std::endl;
    std::cout << "Умножение A*B: " << A*B << std::endl;
    if ((A != 0) && (B != 0))
    {
        std::cout << "Деление A/B: " << A / B << std::endl;
        std::cout << "Деление B/A: " << B / A << std::endl;
    }
    system("pause");
}

Answer 2

PascalABC.NET 3.2 (сборка 1467 от 02.06.2017)

Begin
(Var A,Var B):=(ReadReal('A ='),ReadReal('B ='));
WriteLn('A + B = ',A+B);
WriteLn('A - B = ',A-B);
WriteLn('B - A = ',B-A);
WriteLn('A * B = ',A*B);
WriteLn('A / B = ',A/B);
WriteLn('B / A = ',B/A);
End.