Quảng cáo
1 câu trả lời 380
1) Diện tích hình vuông
uses crt;
var a:integer;
begin
clrscr;
write('Nhap 2 canh: ');readln(a);
writeln('Dien tich hinh vuong la: ',a*a);
readln
end.
2) Diện tích hình tròn
uses crt;
var r:integer;
s:real;
const pi=3.14;
write('Nhap ban kinh: ');readln(r);
s:=pi*r*r;
writeln('Dien tich hinh tron la: ',s:0:2);
readln
end.
3) Diện tích hcn
uses crt;
var a,b:integer;
begin
clrscr;
write('Nhap 2 canh: ');readln(a,b);
writeln('Dien tich hình chu nhat: ',a*b);
readln
end.
4) In ra họ tên
uses crt;
var s:string;
begin
clrscr;
writeln('Nhap ho ten cua ban: ');readln(s);
writeln(s,' da nop bai tap');
readln
end.
Quảng cáo
Bạn cần hỏi gì?
Câu hỏi hot cùng chủ đề
-
Hỏi từ APP VIETJACK45484
-
Hỏi từ APP VIETJACK28358
Gửi báo cáo thành công!
