minh co bai nay:
, Viet chuong trinh nhap 2 so la chieu dai va chieu rong cua hinh chu nhat.tinh chu vi va dien tich .sau do in ra man hinh chu vi va dien tich cua hinh chu nhat do
sau khi viet ct xong va in ra man hinh thi no cho ket qua lai la:
dt hinh chu nhat la 0.0000000000E+00
chu vi hinh chu nhat la 0.0000000000E+00
co minh bao tim hieu va sua lai nhung minh ko hieu no nhu the nao
ban nao giup minh sua lai cai kq ra so nguyen voi huhuhu
de 1:
huong dan
- Nhập hai cạnh vào hai biến a, b.
- Chu vi hình chữ nhật bằng 2*(a+b); Diện tích hình chữ nhật bằng a*b.
b. Mã chương trình:
Program Chu_nhat;
uses crt;
Var a, b, S, CV: real;
Begin
Write('Nhap chieu dai:'); readln(a);
Write('Nhap chieu rong:'); readln(b);
S := a*b;
CV := (a+b)*2;
Writeln('Dien tich hinh chu nhat la:',S);
Writeln('Chu vi hinh chu nhat la:',CV:10:2);
readln
end.
de 3,
program bt;
uses CRT;
var m,n:integer;
T:real;
BEGIN clrscr;
write('m,n ='); readln(m,n);
writeln('Tong la:',m+n);
writeln('Hieu la:',m-n);
writeln('Tich la:',m*n);
T:=m/n;
writeln('Thuong la:',T);
readln
END.
