Question

ПОМОГИТЕ ПОЖАЛУЙСТА!!!!!!!!!

eafaff3b10eda7c39a98a67eae4321ae.doc

6af6eaf99fe23db32dc9ea2a8709e003.doc

Answer 1

var y:real; x:integer;

begin

for x:=4 to 9 do

begin

y:=(5.01 * (x * x)) - (sqrt(x));

writeln(x,' ', y);

end;

end.