Так понимаю, консольный Delphi - это Pascal?)
var x, y, a, k: real;
begin
readln(a, y);
if (a > y) then
begin
x := a / 100;
writeln(x);
end;
if (a < y) then
begin
k := 100 * abs(a);
writeln(k);
end;
<span>end.</span>
№6
(92-29)/(3+6)=7
31/61+24*2/96=0,25
(exp(7*in(2))-30)/138*3=2,13 ( округлённая десят. дробь)
(25+exp(2*in(3)))/(11*6-64)=17
№7
* -это умножение а / (слэш) деление или дробь
вроде как правильно ..
Программа на Паскале прилагается.