Запишите на языке Паскаль следующее выражение: если (a-b)<=c, тогда s=a*c, иначе s=a:c
If (a-b)<=c then s:=a*c else s:=a/c;