Даны 2 переменные А и В. Если A>B, то вывести ** печать их произведение, в противном...

Question

Даны 2 переменные А и В. Если A>B, то вывести на печать их произведение, в противном случае сумму.

Answer 1

Var A,B : integer;
begin
    Read(A);
    Read(B);
    if A>B then
        Writeln(A*B)
    else 
        Writeln(A+B);
end. 

Comments

Лучше напишите Readln , чтобы не было слитного написания значений переменных. Так же может добавить Writeln('Введи значение переменной A : '); и Writeln('Введи значение переменной B : '); .

---

Да, ерунду полную написал, прошу прощение.

---

О, впервые узнал. Спасибо, что просветили)