Cho bài toán: viết chương trình tính chu vi (CV) và diện tích (S) của hình chữ nhật, biết chiều dài a = 12, chiều rộng b = 8. • Hãy khai báo các biến cần dùng trong chương trình? • Viết lệnh gán chiều dài, chiều rộng, tính chu vi, diện tích hình chữ nhật?
2 câu trả lời
Program Typlex;
Uses crt;
Var a,b: real;
Begin
a:=12;
b:=8;
Writeln('Chu vi cua hinh chu nhat ',(a+b)*2);
Writeln('Dien tich cua hinh chu nhat ',a*b);
Readln
End.
#Xin CTLHN, chúc bạn học tốt
program baitap;
uses crt;
var cv,s,a,b:integer;
begin
clrscr;
a := 12;
b := 8;
cv := (a+b)*2;
s := a*b;
writeln('Chu vi HCN = ',cv);
writeln('Dien tich HCN = ',s);
readln;
end.
