Những câu hỏi liên quan
hà nội 123
Xem chi tiết
Nguyễn Lê Phước Thịnh
13 tháng 5 2021 lúc 16:59

1:

function dt(r:real):real;

begin

dt:=sqr(r)*pi;

end;

Bình luận (0)
Nguyễn Lê Phước Thịnh
13 tháng 5 2021 lúc 16:59

2:

function dt(a,b:real):real;

begin

dt:=1/2*a*b;

end;

Bình luận (0)
Nguyễn Lê Phước Thịnh
13 tháng 5 2021 lúc 16:59

3:

function dt(a,b,c:real):real;

var p,s:real;

begin

p:=(a+b+c)/2;

s:=sqrt(p*(p-a)*(p-b)*(p-c));

dt:=s;

end;

Bình luận (0)
Mai Chi Ma
Xem chi tiết
Mai Chi Ma
23 tháng 1 2018 lúc 21:47

ai giúp mình với mình cần gấp bạn nào làm đúng đầu tiên mình k cho

Bình luận (0)
Pham Trong Bach
Xem chi tiết
Cao Minh Tâm
29 tháng 1 2019 lúc 4:08

Chọn C.

Gọi  Khi đó phương trình tiếp tuyến M 0  

Ta có: 

Không mất tính tổng quát của  M 1 ( x 1 ; y 1 ) ,   M 2 ( x 2 ; y 2 ) ,   M 3 ( x 3 ; y 3 ) , ta có:

Bình luận (0)
Pham Trong Bach
Xem chi tiết
Cao Minh Tâm
19 tháng 5 2018 lúc 3:25

Bình luận (0)
Cún đi hỏi bài
Xem chi tiết
Nguyễn Lê Phước Thịnh
9 tháng 5 2021 lúc 20:31

Câu 4: 

a) 

uses crt;

var n:integer;

{---------------------ham-tinh-giai-thua-----------------------}

fucntion gt(x:integer):real;

var i:integer;

begin

gt:=1;

for i:=1 to x do 

 gt:=gt*i;

end;

{--------------------chuong-trinh-chinh---------------------}

begin

clrscr;

write('Nhap n='); readln(n);

writeln(gt(n):0:0);

readln;

end.

Bình luận (0)
Nguyễn Lê Phước Thịnh
9 tháng 5 2021 lúc 20:32

b) 

uses crt;

var n:integer;

{-------------------thu-tuc-tinh-giai-thua------------------------}

procedure gt(x:integer);

var i:integer;

begin

gt:=1;

for i:=1 to x do

  gt:=gt*i;

writeln(gt);

end;

{-----------------chuong-trinh-chinh--------------------------}

begin

clrscr;

write('Nhap n='); readln(n);

gt(n);

readln;

end.

Bình luận (0)
Pham Trong Bach
Xem chi tiết
Cao Minh Tâm
23 tháng 7 2019 lúc 13:22

Chọn đáp án C

Bình luận (0)
Nguyen Dieu Thao Ly
Xem chi tiết
Nguyễn Lê Phước Thịnh
26 tháng 2 2022 lúc 7:03

Câu 1: 

\(C=2r\cdot3.14=r\cdot6.28\)

Vậy: C và r là hai đại lượng tỉ lệ thuận theo hệ số tỉ lệ k=6,28

Câu 2: 

Vì x và y là hai đại lượng tỉ lệ thuận

nên \(\dfrac{x_1}{x_2}=\dfrac{y_1}{y_2}\)

a: \(\dfrac{x_1}{x_2}=\dfrac{y_1}{y_2}\)

nên \(\dfrac{x_1}{-2}=\dfrac{4}{6}=\dfrac{2}{3}\)

hay \(x_1=\dfrac{-4}{3}\)

b: \(\dfrac{x_1}{x_2}=\dfrac{y_1}{y_2}\)

\(\Leftrightarrow\dfrac{x_1}{-3}=\dfrac{y_1}{4}\)

Áp dụng tính chất của dãy tỉ số bằng nhau, ta được:

\(\dfrac{x_1}{-3}=\dfrac{y_1}{4}=\dfrac{y_1-x_1}{4-\left(-3\right)}=\dfrac{-2}{7}\)

Do đó: \(x_1=\dfrac{6}{7};y_1=-\dfrac{8}{7}\)

Bình luận (0)
Pham Trong Bach
Xem chi tiết
Cao Minh Tâm
26 tháng 3 2017 lúc 3:23

Bình luận (0)
Tuấn Lê
Xem chi tiết
Nguyễn Lê Phước Thịnh
19 tháng 5 2021 lúc 9:50

uses crt;

var a,b,c,p,s,am,bn,cp:real;

begin

clrscr;

write('Nhap a='); readln(a);

write('Nhap b='); readln(b);

write('Nhap c='); readln(c);

if (a>0) and (b>0) and (c>0) and (a+b>c) and (a+c>b) and (b+c>a) then

begin

writeln('Day la ba canh trong mot tam giac vuong');

p:=(a+b+c)/2;

s:=sqrt(p*(p-a)*(p-b)*(p-c));

writeln('Dien tich tam giac la: ',s:4:2);

am:=sqrt(2*(sqr(b)+sqr(c))-sqr(a))/4;

bn:=sqrt(2*(sqr(a)+sqr(c))-sqr(b))/4;

cp:=sqrt(2*(sqr(a)+sqr(b))-sqr(c))/4;

writeln('Do dai duong trung tuyen ung voi canh a la: ',am:4:2);

writeln('Do dai duong trung tuyen ung voi canh b la: ',bn:4:2);

writeln('Do dai duong trung tuyen ung voi canh c la: ',cp:4:2);

end

else writeln('Day khong la ba canh trong mot tam giac');

readln;

end.

Bình luận (0)