Viết Chương Trình Pascal Tính: Tính Diện Tích Của Tam Giác Có 3 Cạnh ...

+500k Đăng ký Đăng nhập +Gửi câu hỏi

• Trang chủ
• Giải bài tập Online
• Đấu trường tri thức
• Dịch thuật
• Flashcard - Học & Chơi
• Cộng đồng
• Trắc nghiệm tri thức
• Khảo sát ý kiến
• Hỏi đáp tổng hợp
• Đố vui
• Đuổi hình bắt chữ
• Quà tặng và trang trí
• Truyện
• Thơ văn danh ngôn
• Xem lịch
• Ca dao tục ngữ
• Xem ảnh
• Bản tin hướng nghiệp
• Chia sẻ hàng ngày
• Bảng xếp hạng
• Bảng Huy hiệu
• LIVE trực tuyến
• Đề thi, kiểm tra, tài liệu học tập

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

Cấp học Đại học Cấp 3 (Trung học phổ thông) - Lớp 12 - Lớp 11 - Lớp 10 Cấp 2 (Trung học cơ sở) - Lớp 9 - Lớp 8 - Lớp 7 - Lớp 6 Cấp 1 (Tiểu học) - Lớp 5 - Lớp 4 - Lớp 3 - Lớp 2 - Lớp 1 Trình độ khác Môn học Âm nhạc Mỹ thuật Toán học Vật lý Hóa học Ngữ văn Tiếng Việt Tiếng Anh Đạo đức Khoa học Lịch sử Địa lý Sinh học Tin học Lập trình Công nghệ Giáo dục thể chất Giáo dục Công dân Giáo dục Quốc phòng và An ninh Ngoại ngữ khác Xác suất thống kê Tài chính tiền tệ Giáo dục kinh tế và pháp luật Hoạt động trải nghiệm Khoa học tự nhiên Khoa học xã hội Tự nhiên & xã hội Bằng lái xe Tổng hợp Huỳnh thắm Tin học - Lớp 1109/10/2016 02:11:22Viết chương trình pascal tính: Tính diện tích của tam giác có 3 cạnh là A, B, C (được nhập từ bàn phím); Viết chương trình cho phép tính trung bình cộng của 4 số (số được nhập từ bàn phím); Viết chương trình cho phép tính trung bình nhân của 4 số với điều kiện chỉ được sử dụng 2 biến (được nhập từ bàn phím)Viết chương trình pascal tính:a) Tính diện tích của tam giác có 3 cạnh là A, B, C (được nhập từ bàn phím) b) Viết chương trình cho phép tính trung bình cộng của 4 số (số được nhập từ bàn phím) c) Viết chương trình cho phép tính trung bình nhân của 4 số với điều kiện chỉ được sử dụng 2 biến (được nhập từ bàn phím)5 Xem trả lời + Trả lời Hỏi chi tiết Hỏi AIHỏi gia sư +500k 76.195×

Đăng nhập

Đăng nhập Đăng nhập với facebook Đăng nhập với google Đăng ký | Quên mật khẩu?

Bằng cách nhấp vào Đăng nhập, bạn đồng ý Chính sách bảo mật và Điều khoản sử dụng của chúng tôi. Nếu đây không phải máy tính của bạn, để đảm bảo an toàn, hãy sử dụng Cửa sổ riêng tư (Tab ẩn danh) để đăng nhập (New Private Window / New Incognito Window).

5 trả lời

Thưởng th.11.2024

Xếp hạng

Đấu trường tri thức +500K

8647 Trinh Le09/02/2017 00:47:35a) Program TAM_GIAC; uses crt; var a,b,c,p,S: real; Begin clrscr; Write('Nhap canh a:');readln(a); Write('Nhap canh b:');readln(b); Write('Nhap canh c:');readln(c); p:=(a+b+c)/2; S:=sqrt(p*(p-a)*(p-b)*(p-c)); Write('Dien tich tam giac la:',s:10:2); readln end.b) Chương trình cho phép tính trung bình cộng của 4 số (số được nhập từ bàn phím)Program TB_CONG_4_SO;uses crt;Var s,a: real;Beginclrscr;S:=0;Write('Nhap so thu nhat:');readln(a); S:=S+a;​​Write('Nhap so thu hai:');readln(a); S:=S+a;​Write('Nhap so thu ba:');readln(a); S:=S+a;​Write('Nhap so thu tu:');readln(a); S:=S+a;Writeln('Trung binh cong:',S/4:10:2);readlnend.c) Chương trình cho phép tính trung bình nhân của 4 số với điều kiện chỉ được sử dụng 2 biến (được nhập từ bàn phím)Program TB_nhan;uses crt;Var a,S: real;Beginclrscr;S:=1;Write('Nhap so thu nhat:');readln(a); S:=S*a;Write('Nhap so thu hai:');readln(a); S:=S*a;Write('Nhap so thu ba:');readln(a); S:=S*a;Write('Nhap so thu tu:');readln(a); S:=S*a;Write('Trung binh nhan cua bon so la:',sqrt(sqrt(s)));readlnEnd.​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ờ Đăng nhập bằng Google Đăng nhập bằng Facebook Tôi đã có tài khoản? Đăng nhập 2427 Nguyễn Mạnh Nam12/01/2018 21:19:31Bài 1 Begin write ("Nhap so nguyen a = "); readln(a); write ("Nhap so nguyen b = "); readln(b); write ("Nhap so nguyen c = "); readln(c); max:=a; if max < b then max:=b; if max < c then max:=c; writeln ("So lon nhat trong 3 so la :",max); min:=a; if min>b then min:=b; if min>c then min:=c; writeln ("So lon nhot trong 3 so la :",min); readln; End. Bài 2: Tương tự bài 1 nhưng khi khai báo biến thì chọn kiểu real chứ ko phải integer Bài 3: Bài này chú ý các biến x phải để ở kiểu số thực Program PTB2; Var a,b,c:Integer; Delta,x,x1,x2:Real; Begin Writeln('GIAI PHUONG TRINH BAC 2'); Writeln('-----------------------'); Write('-Nhap he so a= '); Readln(a); Write('-Nhap he so b= '); Readln(b); Write('-Nhap he so c= '); Readln(c); Delta:=sqr(b)-4*a*c; If Delta < 0 Then Writeln('+Phuong trinh vo nghiem') Else If Delta=0 Then Begin X:=-b/2*a; Writeln('+Phuong trinh co 2 nghiem bang nhau X1=X2= ',X:6:2); End Else Begin X1:=-b-Sqrt(Delta)/2*a; X2:=-b+Sqrt(Delta)/2*a; Writeln('+Nghiem thu nhat = ',X1:6:2); Writeln('+Nghiem thu hai = ',X2:6:2); End; Writeln; Writeln(' Bam phim <Enter> de ket thuc'); Readln End. Bài 4: Bài này thì rất dễ mình làm đoạn thân chính thôi nhé if n mod 4 = 0 then write ("Day la nam nhuan") else write ("Day khong phai nam nhuan"); Bài 5 : Var a , b , c : Real ; BEGIN Writeln (' Nhap do dai 3 canh cua tam giac : ') ; Write (' a = ') ; Readln ( a ) ; Write (' b = ') ; Readln ( b ) ; Write (' c = ') ; Readln ( c ) ; If ( a + b > c ) and ( b + c > a ) and ( c + a > b ) and ( a > 0 ) and ( b > 0 ) and ( c > 0 ) Then Writeln (' Thoa man : Day la 3 canh cua mot tam giac ') Else Writeln (' Khong thoa man ! ') ; Readln ; END. Điểm từ người đăng bài:0 1 2 3 4 5 Tặng xu Tặng quà Báo cáo Bình luận: 0 Gửi94 Hoa11/12/2018 21:14:591 Viết chương trình nhập vào một số tự nhiên n. In ra man hình n chẵn hay n lẻ.Bài làmprogram chan_le;uses crt;var n:interger;beginclrscr;writeln('nhap n'); readln(n);If n mod 2=0 then writeln('n la so chan')else writeln('n la so le')readln;end. Báo cáo Bình luận: 0 Gửi38 NoName.60343007/11/2019 19:43:00tính diện tích của tam giác theo công thức hê rôn với ba cạnh a,b,c được nhập từ bàn phím Báo cáo Bình luận: 0 Gửi30 hackfake10/11/2021 21:18:50program bai1;uses crt;vả a,b,c:integer; p,s:real;beginclrscr;write('nhap a:');readln(a);write('nhap b:');readln(b);write('nhap c:');readln(c);p:=(a+b+c)/2;s:=sqrt(p*(p-a)*(p-b)*(p-c));writeln('dien tich ......);readln;end. Tặng xu Tặng quà Báo cáo Bình luận: 0 Gửi Trả lời nhanh trong 10 phút và nhận thưởng Đấu trường tri thức +500K Viết chương trình pascalTính diện tích của tam giác có 3 cạnh là A B CViết chương trình cho phép tính trung bình cộng của 4 sốViết chương trình cho phép tính trung bình nhân của 4 số với điều kiện chỉ được sử dụng 2 biếnTin học - Lớp 11Tin họcLớp 11

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

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

GỬI CÂU HỎIHọ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ệmCâu hỏi mới nhất

Ba quả táo cân nặng bằng nhau được đựng trong một chiếc rổ. Cân nặng của cả rổ và táo là 1kg (Toán học - Lớp 3)

0 trả lời

Cho sơ đồ hình thành ion H3O+ từ phần tử H2O và ion H+ như sau: Biết rằng số hiệu nguyên tố H: 1; O: 8. Nhận xét nào sau đây không đúng? (Hóa học - Lớp 10)

1 trả lời

Thực hiện phép tính? Cho đa thức: A = 3x^2y - xy - 1. Tính giá trị của đa thức A tại x = 2; y = 1. (Toán học - Lớp 8)

0 trả lời

Choose the word whose underlined part is pronounced differently (Tiếng Anh - Lớp 8)

4 trả lời

Làm tròn các số sau đến hàng chục (Toán học - Lớp 3)

2 trả lời Xem thêm Câu hỏi liên quan

Giải phương trình: 5cosx - 2 = 0 (Toán học - Lớp 11)

3 trả lời

Trong không gian với hệ tọa độ Oxyz, cho hai điểm A(0; 1; 1) và B(1; 2; 3). Viết phương trình của mặt phẳng (P) đi qua A và vuông góc với đường thẳng AB (Toán học - Lớp 12)

1 trả lời

Một gen có tỉ lệ % nuclêôtit A gấp 1,5 lần nuclêôtit khác, tìm tỉ lệ % A, T, G, X; Một gen dài 5100 ăngtơrông, tỉ lệ % nuclêôtit G là 30%. a) Tính klpt, số vòng xoắn?. b) Số lượng A, T, G, X. c) Số liên kết hiđrô của gen? (Sinh học - Lớp 9)

1 trả lời

Cho hình chóp S.ABC có đáy ABC là tam giác đều cạnh bằng 1, mặt bên SAB là tam giác đều và nằm trong mặt phẳng vuông góc với mặt phẳng đáy. Tính thể tích V của khối cầu ngoại tiếp hình chóp đã cho? (Toán học - Lớp 12)

3 trả lời

Tìm a, b để số 12a3b chia hết cho 45? (Toán học - Lớp 6)

3 trả lời

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

Bảng xếp hạng thành viên01-2025 12-2024 Yêu thích1Phạm Ngọc Thiện383 điểm 2Đặng Mỹ Duyên210 điểm 3Đặng Hải Đăng66 điểm 4Trúc Nguyễn22 điểm 5Lyntc21 điểm1Little Wolf12.683 điểm 2ngân trần9.306 điểm 3Chou8.907 điểm 4Đặng Hải Đăng8.282 điểm 5bảo hân8.149 điểm1Larcy61 sao 2Trần Anh Khang25 sao 3Mèo béo tu tiên20 sao 4offf rồi20 sao 5Vân Anh15 sao

Thưởng th.11.2024

Bảng xếp hạng

Trang chủ	Giải đáp bài tập	Đố vui	Ca dao tục ngữ	Liên hệ	Tải ứng dụng Lazi
Giới thiệu	Hỏi đáp tổng hợp	Đuổi hình bắt chữ	Thi trắc nghiệm	Ý tưởng phát triển Lazi
Chính sách bảo mật	Trắc nghiệm tri thức	Điều ước và lời chúc	Kết bạn 4 phương	Xem lịch
Điều khoản sử dụng	Khảo sát ý kiến	Xem ảnh	Hội nhóm	Bảng xếp hạng
Tuyển dụng	Flashcard	DOL IELTS Đình Lực	Mua ô tô	Bảng Huy hiệu
Đấu trường tri thức	Thơ văn danh ngôn	Từ điển Việt - Anh	Đề thi, kiểm tra	Xem thêm

Đơn vị chủ quản: Công ty CP Công nghệ LaziMã số doanh nghiệp: 0108765276Địa chỉ: Trần Quốc Hoàn, Cầu Giấy, Hà NộiEmail: lazijsc@gmail.com - ĐT: 0387 360 610Chịu trách nhiệm nội dung: Phạm Văn Cao© Copyright 2015 - 2025 Lazi. All rights reserved.× Trợ lý ảo× +500k Gửi câu hỏi×