S= a+b/a-b +3*a Паскаль
Код: var s,a,b : real;begin write('Введите а: '); readln(a); write('Введите b: '); readln(b); s := a + b / a - b + 3 * a; writeln('S = '+s); end.