Giải giúp mình cách tính lập trình pascal tính diện tích hình chữ nhật đi mn

Question

havu · Answer

uses crt;         var a,b,S,P: integer;         begin         writeln('Nhap chieu dai:');         readln(a);         writeln('Nhap chieu rong:');         readln(b);         P:=((a+b)*2);         S:=(a*b);         writeln('Chu vi la:',P);         writeln('Dien tich la:',S);         readln         end.      XIN HAY NHẤT Ạ

giangnguyen · Answer

program dientichHCN;
uses crt;
var chieu_dai,chieu_rong,dientich:integer;
begin
CLRSCR;
writeLN(‘Nhap chieu_dai, chieu_rong cua HCN’);
readLN(chieu_dai,cchieu_rong);
dientich:=chieu_dai*chieu_rong;
writeLN(‘dientich= ‘,dientich);
readLN();
end.

Chúc bạn học tốt !!!!!!

Trả lời

Giải giúp mình cách tính lập trình pascal tính diện tích hình chữ nhật đi mn

Viết một bình luận Hủy