Question

Составить программу, определяющую минимальное число из двух чисел, введенных с клавиатуры и увеличивающую найденное число вдвое.

Answer 1

read (a,b);
if a<b then a:=a*2 else b:=b*2