решить задачи в Pascal 1. Пользователь вводит два вещественных числа. Если первое не превосходит второе более, чем в два раза, то найдите их сумму и разность первого и второго и выведите их на экран. В противном случае вычислите произведение их модулей и выведите на экран.
2. Пользователь вводит два целых двузначных числа. Если большее из них нечетное, то выведите на экран первую цифру максимального числа. В противном случае вычислите частное большего и меньшего и выведите его на экран.