5.Cоставьте программу для определения значения следующих выражений :а)0,5x в квадрате /(a+b)
5.Cоставьте программу для определения значения следующих выражений :а)0,5x в квадрате /(a+b)
Гость
Ответ(ы) на вопрос:
ГостьPascal
var
x,a,b : integer;
r : real;
begin
readln (x,a,b);
r := (0.5*sqr(x))/(a+b);
writeln (r)
end.
Не нашли ответ?
Похожие вопросы