
Vaunvoksa
5 год назад
написать программу функции y=(a^2-2b-c^2)/3ab при значениях a=20 b=10 c=14
ОТВЕТЫ

Pohl Annika
Oct 24, 2020
Var a,b,c:real;
Begin
Write('a = ');ReadLn(a);
Write('b = ');ReadLn(b);
Write('c = ');ReadLn(c);
Write('y = ',(a*a-2*b-c*c)/(3*a*b));
End.
Begin
Write('a = ');ReadLn(a);
Write('b = ');ReadLn(b);
Write('c = ');ReadLn(c);
Write('y = ',(a*a-2*b-c*c)/(3*a*b));
End.
189
Смежные вопросы: