hãy viết chương trình tính và thông báo ra màn hình chu vi và diện tích của hình vuông biết độ dài cạnh hình vuông(kiểu số nguyên dương) đc nhập từ bp.
Hãy viết ctrinh tính và thông báo ra mh vận tốc rơi tự do của vật biết công thức tính vt là v= √2gh trong đó g là gia tốc rơi tự do (g=9.8 m/s) và h là độ cao của vật(kiểu số nguyêndương) đc nhập từ bp
bài 1
program chuvivadientich;
uses crt;
var a,s,p: integer;
begin
clrscr;
s:=0;
p:=0;
writeln(‘nhap do dai canh cua hinh vuong’,a);
readln(a);
s:=a*a;
p:=4*a;
write(‘chu vi cua hinh vuong la’,p); readln(p);
write(‘dien tich cua hinh vuong la’,s);
readln
end.
Bài 1:
uses crt;
var a,DT,CV: integer;
Begin
clrscr;
Write(‘Nhap chieu dai canh: a= ‘); readln(a);
CV:=a*4;
DT:=a*a;
writeln(‘Chu vi la: ‘,CV,’ cm’);
writeln(‘Dien tich la: ‘,DT,’ cm2′);
readln
end.
Bài 2:
uses crt;
var v,g,h: real;
Begin
clrscr;
Write(‘Nhap do cao: h=’); readln(h);
g:=9.8;
v:=sqrt(2*g*h);
writeln(‘Van toc roi cua vat la: ‘,v:1:2,’ m/s’);
readln
end.