
Đăng ký Đăng nhập +Gửi câu hỏi
Trang chủ
Giải bài tập Online
Dịch thuật
LAZI Confessions
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
Đề thi, kiểm tra, tài liệu học tập
Xem thêm

Đồng hồ báo thức hình con ong ...

Túi Đựng phụ kiện vật dụng cá ...
Bài tập | Bài chưa 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 Trả lời có/chưa? Chưa trả lời Đã trả lời

Chí Bảo Tin học - Lớp 810/12/2017 11:29:37Viết chương trình tính diện tích hình vuông trong Pascal. Viết chương trình tính diện tích hình chữ nhật trong PascalViết chương trình tính diện tích hình vuông trong Pascal.Viết chương trình tính diện tích hình chữ nhật trong Pascal.Viết chương trình tính diện tích hình tam giác trong Pascal.
14 Xem trả lời + Trả lời
Hỏi lại yêu cầu
AI Chat
76.763
×
Đăng nhập
Đăng nhập
Đă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).
14 trả lời

Thưởng th.11.2025

Xếp hạng

253

78

Nhật Tường10/12/2017 11:30:25+1đ
Viết chương trình tính diện tích hình vuông trong Pascalprogram dientich; uses crt; var S,a:integer; begin writeln('nhap a'); readln(a); S:=a*a; writeln('ketqua',S); 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ộ Trả lời và Chat với Trợ lý ảo Lazi AI bằng cách Đăng nhập tài khoản ngay bây giờ
Đăng nhập bằng Google Tôi đã có tài khoản? Đăng nhập 
129

71

Nguyễn Nhật Thúy ...10/12/2017 11:30:42+1đ1/ Tính chu vi, diện tích hình vuông có cạnh là a: PROGRAM HINH VUONG; {Nhap canh a cua hinh vuong. Tinh chu vi, dien tich cua hinh vuong ay} VAR a:real; BEGIN Write('Nhap canh a: ');readln(a); Writeln; If a>0 then begin Writeln('Chu vi P = ',4*a:6:2); Writeln('Dien tich S = ',a*a:6:2); end Else writeln(#7,'Khong thuc hien vi a <= 0'); Readln END.
Điểm thực lực: 1 Điểm cảm ơn:0 1 2 3 4 5 
Tặng xu

Tặng quà

Báo cáo

Bình luận: 1

Maynhinmaylamconcho ...sai program xong đến uses crt; Gửi

53

26

Nguyễn Nhật Thúy ...10/12/2017 11:31:252/ Tính chu vi, diện tích hình chữ nhật có hai kích thước là a và b: PROGRAM HINH CHU NHAT; {Nhap hai kich thuoc a, b cua hinh chu nhat. Tinh chu vi, dien tich cua hinh chu nhat ay} VAR a,b:real; BEGIN Write('Nhap canh a: ');readln(a); Write('Nhap canh b: ');readln(b); Writeln; If (a>0) and (b>0)then begin Writeln('Chu vi P = ',2*(a+b):6:2); Writeln('Dien tich S = ',a*b:6:2); end Else writeln(#7,'Khong thuc hien vi a <= 0 hoac b<=0'); Readln END.
Điểm cảm ơn:0 1 2 3 4 5 
Tặng xu

Tặng quà

Báo cáo

Bình luận: 0 Gửi

37

12

Nguyễn Nhật Thúy ...10/12/2017 11:31:493/ Tính chu vi, diện tích hình tròn có bán kính là R: a) Cách 1: PROGRAM HINH TRON; {Nhap ban kinh R cua duong tron. Tinh chu vi, dien tich cua duong tron ay} VAR R:real; BEGIN Write('Nhap ban kinh R: ');readln(R); Writeln; If R>0 then begin Writeln('Chu vi P = ',2*pi*R:6:2); Writeln('Dien tich S = ',pi*R*R:6:2); end Else writeln(#7,'Khong thuc hien vi R <= 0'); Readln END. b) Cách 2: PROGRAM HINH TRON; {Nhap ban kinh R cua duong tron. Tinh chu vi, dien tich cua duong tron ay} VAR R:real; BEGIN Repeat Write('Nhap ban kinh R: ');readln(R); Until R>0; Writeln; Writeln('Chu vi P = ',2*pi*R:6:2); Writeln('Dien tich S = ',pi*R*R:6:2); Readln END.
Điểm cảm ơn:0 1 2 3 4 5 
Tặng xu

Tặng quà

Báo cáo

Bình luận: 0 Gửi

26

16

Nhật Tường10/12/2017 11:31:51+1đ
Viết chương trình tính diện tích hình chữ nhật trong PascalPROGRAM HINH CHU NHAT; {Nhap hai kich thuoc a, b cua hinh chu nhat. dien tich cua hinh chu nhat ay} VAR a,b:real; BEGIN Write('Nhap canh a: ');readln(a); Writeln; If (a>0) and (b>0)then begin Writeln('Dien tich S = ',a*b:6:2); end Else writeln(#7,'Khong thuc hien vi a <= 0 hoac b<=0'); Readln END.
Điểm thực lực: 1 Điểm cảm ơn:0 1 2 3 4 5 
Tặng xu

Tặng quà

Báo cáo

Bình luận: 0 Gửi

62

7
.jpg)
Fan cuồng Barcelona10/12/2017 11:36:28+1đ

[ Nhấp vào ảnh để phóng to, xoay ảnh ]
Điểm thực lực: 1 
Tặng xu

Tặng quà

Báo cáo

Bình luận: 0 Gửi

60

5
.jpg)
Fan cuồng Barcelona10/12/2017 11:38:50

[ Nhấp vào ảnh để phóng to, xoay ảnh ]

Tặng xu

Tặng quà

Báo cáo

Bình luận: 2

Thành Tiến Phanthieu dau hai cham co the thay longint thanh real cung dc

Maynhinmaylamconcho ...phải có biến chứ bạn Gửi

24

3
.jpg)
Fan cuồng Barcelona10/12/2017 11:42:28+1đ

[ Nhấp vào ảnh để phóng to, xoay ảnh ]
Điểm thực lực: 1 
Tặng xu

Tặng quà

Báo cáo

Bình luận: 0 Gửi

10

9

adagaki aki16/10/2018 12:21:54Dung chuong trinh pascalViet chuong trinh nhap vao 2 so a va b . Tinh tong , tich , hieu ,thuong cua a va b.giup minh voi chieu nay minh nop roi.cam mon truoc nha!

Báo cáo

Bình luận: 0 Gửi

7

8

sakura16/10/2018 12:27:44dung pascal de tinh dien tich va chu vi cua hinh vuong ,chu nhat, tam giac.yeu cau su dung hanggiup minh voi

Báo cáo

Bình luận: 0 Gửi

5

3

NoName.61154716/11/2019 08:17:14Viết chương trình điện tích số cùahinh vuông cạnh a trong pascal

Báo cáo

Bình luận: 0 Gửi

5

2

NoName.61901424/11/2019 18:04:49Viết chương trình tính diện tích hình vuông có độ dài a được nhập từ bàn phím. Kiểm tra xem a là số chẵn hay số lẻ

Báo cáo

Bình luận: 0 Gửi

8

0

Ming deptrai22/04/2020 09:09:27Program hinh_vuong;uses crt;var s,a:real;beginclrscr;write('nhap canh a=');readln(a);s:=a*a;writeln('dien tich la:',s:10:2);readlnend._____________________________________Program hinh_chu_nhat;uses crt;var s,a,b:real;beginclrscr;write('nhap canh a=');readln(a);write('nhap canh b=');readln(b);s:=a*b;writeln('dien tich la:',s:10:2);readlnend.____________________________________Program hinh_tam_giac;uses crt;var s,p,a,b,c:real;beginclrscr;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));writeln('dien tich la:',s:10:2);readlnend.

Tặng xu

Tặng quà

Báo cáo

Bình luận: 0 Gửi

0

0

Thành Tiến Phan23/11/2022 21:46:03Program Hinh_vuong;uses Crt;var a, b, s, p:real;BeginWrite('canh hinh vuong:');readln(a);S:=a*4;p:=a*a;Writeln('dien tich hinh vuong:',s);Writeln('chu vi hinh vuong:',p:10:2);readlnEnd.

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 Tin học - Lớp 8Tin họcLớp 8
"Stay hungry, stay foolish" (Hãy cứ khao khát, hãy cứ dại khờ)
Bạn hỏi - Lazi trả lời
Bạn muốn biết điều gì?
GỬI CÂU HỎI

Câu hỏi mới nhất

1 = \(\frac\) \(\frac + \frac = \frac\) 91 = 981 - Z1 \(\frac{{\sqrt{Z - 1889}}}\) \(\frac{{\sqrt{Z - 36}}}\) (Toán học - Lớp 9)

0 trả lời

Bảo vệ môi trường và tài nguyên thiên nhiên của địa phương có vai trò gì? (Giáo dục Quốc phòng và An ninh - Lớp 8)

2 trả lời

Nghệ nhân nào được xem là lãnh tụ tinh thần của người Châu Ro? (Giáo dục Quốc phòng và An ninh - Lớp 8)

3 trả lời

Hành động nào sau đây góp phần bảo vệ môi trường? (Giáo dục Quốc phòng và An ninh - Lớp 8)

2 trả lời

Nguyên nhân nào của Đồng Nai là người đầu tiên được hội Văn nghệ dân gian Việt Nam tặng danh hiệu Nghệ nhân dân gian năm 2008? (Giáo dục Quốc phòng và An ninh - Lớp 8)

3 trả lời

Xem thêm Câu hỏi liên quan

Have you ever done a volunteer work? (Tiếng Anh - Lớp 7)

2 trả lời

Em hãy kể lại những kỉ niệm sâu sắc của ngày khai trường đầu tiên (Ngữ văn - Lớp 8)

5 trả lời

Cho dãy số (Un) Un = 3 - 1 với mọi n thuộc N*. Chứng minh rằng dãy số (Un) là dãy số tăng (Toán học - Lớp 11)

2 trả lời

Viết chương trình Pascal hoàn chỉnh (Tin học - Lớp 8)

0 trả lời

Diện tích một khu vườn của một trường tiểu học là 731 mét vuông. Diện tích khu đất trồng cây ăn quả nhiều hơn diện tích khu đất trông cây lấy gỗ là 26,5 mét vuông và ít hơn diện tích khu đất trồng hoa 24 mét vuông. Hỏi diện tích mỗi khu đất là bao nhiêu mét vuông? (Toán học - Lớp 5)

4 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
Bảng xếp hạng thành viên12-2025 11-2025 Yêu thích1

Chouuu526 điểm 2

Quang Cường467 điểm 3

.Ngọc Diệp.459 điểm 4

nqocanhh409 điểm 5

hfmiez408 điểm1

Quang Cường1.264 điểm 2

nqoc anh901 điểm 3

Chouuu725 điểm 4

Nhật Phúc582 điểm 5

ng chau538 điểm1

Huyền Trang635 sao 2

md.600 sao 3

blaa580 sao 4

hfmiez510 sao 5

⋆。˚୨ৎ⋆。˚ kẹo đồng ...425 sao
Thưởng th.11.2025 |
Bảng xếp hạng |

Gấu Bông Hoa Hồng Đỏ Khổng Lồ - Hoa Hồng Quà Tặng Bạn Gái Mềm Mại Lãng Mạn G175

Combo 10 Túi đựng quà giáng sinh có dây nơ buộc cute dễ thương, túi gói quà noel, quà tặng học ...
| 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 | Thơ văn danh ngôn | Mua ô tô | Bảng Huy hiệu |
| Đề 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: [email protected] - ĐT: 0387 360 610Chịu trách nhiệm nội dung: Phạm Văn Cao© Copyright 2015 - 2025 Lazi. All rights reserved.×

+Gửi câu hỏi LAZI MALL×