Ответы
Ответ дал:
0
Var
a,b:real;
Begin
Write('a = ');ReadLn(a);
Write('b = ');ReadLn(b);
WriteLn((a*4*b)*(a-3*b)+a*a)
End.
a,b:real;
Begin
Write('a = ');ReadLn(a);
Write('b = ');ReadLn(b);
WriteLn((a*4*b)*(a-3*b)+a*a)
End.
Ответ дал:
0
спосибо
Вас заинтересует
2 года назад
7 лет назад
7 лет назад
9 лет назад
9 лет назад
10 лет назад