Ответы
Ответ дал:
0
program zadanie;
var a,b,c,d,e:real;
beginreadln(a,b,c,d);
e:= (a / c) * (b / d)-(a * b - c)/ (-c * d);
writeln(e);readln;
end.
вот должно работать!
var a,b,c,d,e:real;
beginreadln(a,b,c,d);
e:= (a / c) * (b / d)-(a * b - c)/ (-c * d);
writeln(e);readln;
end.
вот должно работать!
Похожие вопросы
2 года назад
2 года назад
7 лет назад
10 лет назад
10 лет назад
10 лет назад