Question

Составьте по программе на паскаль

Answer 1

program raf105;

var a,b,x,y:real;

begin

write('Введите x и y: ');

readln(a,b);

x:= (6.7*a-3.4*(b**2))/3;

y:= 4.7*a-1.5*b;

writeln('x = ',x);

writeln('y = ',y);

end.

Язык PascalABC