Даны два числа найти сумму этих чисел если первое число не меньше второго и найти их...

Question

Даны два числа найти сумму этих чисел если первое число не меньше второго и найти их произведение в противном случае. Блок схема и на паскале.

Answer 1

var

   first, otvet, second: longint;

begin

   write('Первое число = ');

   readln(first);

   write('Второе число = ');

   readln(second);

   if first < second then

       otvet := first + second

   else  

       otvet := second * first;

   writeln('Ответ: ', otvet);

end.

//пж отметь как лучший