ДАЮ 25 БАЛЛОВ Составьте блок-схему и программу к следующей задаче: Запрашиваются два...

Question

ДАЮ 25 БАЛЛОВ Составьте блок-схему и программу к следующей задаче: Запрашиваются два числа. Если больше первое число, те вычисляется их сумма, а если второе больше первого, то разность, а если они равны, то произведение. ДАЮ 25 БАЛЛОВ (блок-схему можно не делать)

Answer 1

Program TwoNumbers;

Var a,b: integer;

Begin

ReadLn(a,b);

If a>b then WriteLn(a+b);

If a If a=b then WriteLn(a*b)

End.