LH Quảng cáo: lazijsc@gmail.com

Bài tập  /  Bài đang cần trả lời

Cho ba số a, b, c. Viết thuật toán kiểm tra 3 số trên có lập thành 3 cạnh của một tam giác không?

1. Cho ba số a, b, c. Viết thuật toán kiểm tra ba số trên có lập thành ba cạnh của một tam giác không?
2. Cho ba số nguyên dương a, b, c. Viết thuật toán kiểm tra ba số trên có lập thành bộ số pitago không?
3. Cho dãy số nguyên A gồm n phần tử và số nguyên k. Viết thuật toán thông báo các số lớn hơn k trong dãy.
4. Cho 2 phân số a/b và c/d. Viết thuật toán xác định bài toán , sau đó rút gọn phân số vừa thính được?
5 trả lời
Hỏi chi tiết
31.083
26
13
Hà Thanh
26/12/2017 20:14:03
Câu 1:
Program Tam_giac;
Var a,b,c,cv,dt,p:real;
Begin
write(' Nhap a=');readln(a); <br />write(' Nhap b=');readln(b); <br />write(' Nhap c=');readln(c); <br />if (a+b)<=c or (a+c)<=b or (b+c)>a then <br />write(' A,b,c khong phai 3 canh tam giac')
else
cv:=a+b+c;
p:=cv/2;
dt:sprt((P*(P-a)*(P-b)*(P-c));
write(' Dien tich tam giac',Dt:7:3);
write(' Chu vi tam giac:', Cv:7:3);
readln;
End.

Mở khóa để xem toàn bộ nội dung trả lời

(?)
Bạn đã đạt đến giới hạn của mình. Bằng cách Đăng ký tài khoản, bạn có thể xem toàn bộ nội dung trả lời
Cải thiện điểm số của bạn bằng cách đăng ký tài khoản Lazi.
Xem toàn bộ các câu trả lời, chat trực tiếp 1:1 với đội ngũ Gia sư Lazi bằng cách Đăng nhập tài khoản ngay bây giờ
Tôi đã có tài khoản? Đăng nhập
61
12
Ngọc Trâm
26/12/2017 20:14:05
1..Input:Cho ba số a, b, c.
Output:kiểm tra ba số trên có lập thành ba cạnh của một tam giác không?
*Thuật toán:
B1: nhập ba số a, b, c.
B2: nếu (a+b)>c và(b+c)>a và(c+a)>a thì ba số a, b, c lập thành ba cạnh của một tam giác ngược lại ba số a, b, c không lập thành ba cạnh của một tam giác
16
6
Ngọc Trâm
26/12/2017 20:19:06
2,..Input:Cho ba số a, b, c. 
Output:kiểm tra ba số trên có lập thành bộ số pitago không?
*Thuật toán:
B1: nhập ba số a, b, c. 
B2: nếu (a²+b²)=c² và(b²+c²)=a²và(c²+a²)=a² thì ba số a, b, c lập thành  bộ số Pitago ngược lại ba số a,b,c không lập thành bộ số Pitago
B3: kết thúc
8
12
Thùy Trang
28/12/2017 12:08:13
1.Program tam_giac_vuong;
Uses crt;
Var a,b,c:real;
Begin
     clrscr;
     write('nhap do dai canh thu nhat :');
     readln(a);
     write('nhap do dai cannh thu hai :');
     readln(b);
     write('nhap do dai canh thu ba :');
     readln(c);
     if (c*c=a*a+b*b)or(b*b=c*c+a*a)or(a*a=b*b+c*c) then
         writeln('Day la tam giac vuong')
      else
          writeln('Day la tam giac thuong');
      readln;
End.
2
3
Khánh Rukachi
29/10/2019 19:26:33
program baitap;
uses crt;
var a,b,c: real;
begin
clrscr;
write('Nhap 3 so a, b, c: ');
readln(a,b,c);
if (a+b>c)and(a+c>b)and(b+c>a) then
begin
write('3 canh vua nhap la tam giac ');
if (a=b)or(b=c)or(a=c) then
begin
if(a=b)and(b=c) then write('deu') else write('can');
end;
if (a*a=b*b+c*c)or(b*b=a*a+c*c)or(c*c=a*a+b*b) then write('vuong');
end
else
write('3 canh vua nhap ko phai la tam giac');
readln;
end.
 

Bạn hỏi - Lazi trả lời

Bạn muốn biết điều gì?

GỬI CÂU HỎI
Học tập không giới hạn cùng học sinh cả nước và AI, sôi động, tích cực, trải nghiệm
Bài tập liên quan
Trắc nghiệm Tin học Lớp 10 mới nhất

Hôm nay bạn thế nào? Hãy nhấp vào một lựa chọn, nếu may mắn bạn sẽ được tặng 50.000 xu từ Lazi

Vui Buồn Bình thường

Học ngoại ngữ với Flashcard

×
Trợ lý ảo Trợ lý ảo
×
Gia sư Lazi Gia sư