На языке программирования Pascal реализовать следующие задачи: 1) Даны 2 переменные, в которые пользователь вводит два

1) var P,N: real; begin read(P);read(N); if (P<N) then degin P:=N+P; end;end.2)Данная программа считывает числа F и G,если F больше G, то присваивает G разность G-F , F сумму G и Fв противном случае F присваивается разность F-G, а G сумма G b F,далее выводятся значения F и G.