Информатика 9 класс ветвление.Даны два числа если числа одинаковые оставьте их без...

Question

Информатика 9 класс ветвление.Даны два числа если числа одинаковые оставьте их без изменений, в противном случае большее из этих чисел заменить их суммой, а меньшее их удвоенным произведением. Ввести полученное число

Answer 1

Урывок кода* паскаль
if a>b then  begin  
c:=a+b;  
b:=a*b;  
a:=c;  
end  else  begin  
c:=a+b;  
a:=a*b;  
b:=c;  
end;