Помогите пожалуйста СРОЧНО ((((
Даны 2 числа. Если первое больше второго, вывести их сумму. Если числа равны, вывести соответствующие пояснения. Если не выполняется ни одно из условий, вывести произведение чисел.
Даны 2 числа. Если первое больше второго, вывести их сумму. Если числа равны, вывести соответствующие пояснения. Если не выполняется ни одно из условий, вывести произведение чисел.
Answers & Comments
program ghvv;
var
a, b: integer;
bool: boolean;
begin
readln(a);
readln(b);
begin
if a > b then
writeln(a + b) ;
end;
begin
if a = b then
Writeln('числа равны') ;
end;
begin
if a < b then
writeln(a * b) ;
end;
end.