Ответ №1
Program xy;uses CRT; var x:integer; y:real;begin clrscr; for x:=2 to 10 do begin y:=0.4*sqr(x)-1/x; writeln(y:5:2); end;end.
Ответ №1
Program xy;uses CRT; var x:integer; y:real;begin clrscr; for x:=2 to 10 do begin y:=0.4*sqr(x)-1/x; writeln(y:5:2); end;end.
Знаете ответ?