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

Program n1;
var a,b: integer;
begin
readln(a,b);
if agt;b then
begin
b:=a+b;
writeln(b);
end else if alt;b then
begin
a:=a+b;
writeln(a);
end;
end.

include lt;iostreamgt;

int main()

    int A, B;
    setlocale(LC_ALL, "RUSSIAN");
    std::cout lt;lt; "Введите A gt;gt; ";
    std::cin gt;gt; A;
    std::cout lt;lt; "Введите B gt;gt; ";
    std::cin gt;gt; B;
    if (A gt; B)
        B += A;
    else
        A += B;
    std::cout lt;lt; "A=" lt;lt; A lt;lt; std::endl;
    std::cout lt;lt; "B=" lt;lt; B lt;lt; std::endl;
    system("pause");