Question

Bài 7: Tính gần đúng với sai số 10-4 hàm sin(x) có khai triển Taylor: 

sin(x) = -  + - . . .(-1)k 

Bài 8: Tính gần đúng với sai số 10-4 hàm cos(x) có khai triển Taylor:

cos(x) = 1- +  -  + . . .(-1)k 

Bài 9: Dùng lệnh lặp while…do… viết chương trình tìm nghiệm nguyên trong khoảng 

0≤x,y ≤50 của phương trình sau x2 + y2 = n  với n là số nguyên dương nhập vào từ bàn phím

Ví dụ: nhập n = 5 xuất ra nghiệm x=1 y=2  và x=2,y=1 

 

Answer 1

Bài 9:

uses crt;

var x,y,n:integer;

begin

clrscr;

readln(n);

x:=0;

y:=0;

while (x*x+y*y<>n) do

begin

x:=x+1;

y:=y+1;

end;

writeln(x,' ',y);

readln;

end.