Viết chương trình tính căn bậc n của x

0 bình luận về “Viết chương trình tính căn bậc n của x”

1. Program Hotboy; 

   Uses crt; 

   Var n,x,s : real;

   Begin

   Clrscr;

   S:=0; 

   Write(‘nhap so x’); readln(x);

   Write(‘nhap can bac n’) ; readln(n);

   S:=Exp(ln(x)*1/n);

   Writeln(‘can bac n cua x la’,S); 

   Readln

   End.

   Bình luận

2. Program CHUONG_TRINH_BAC_NHAT:

   Uses crt; 

   Var n,x,y: real;

   Begin

   Clrscr;

   S:=0; 

   Write(‘nhap so x’); readln(x);

   Write(‘nhap can bac n’) ; readln(n);

   Y:=Exp(ln(x)*1/n);

   Writeln(‘can bac n cua x la’,Y); 

   Readln

   End.

   Bình luận