Bài tập 1.
Cho chương trình Pascal:
Program
Var
tinh dien tich_hinh tam_giac;
a, h: real;
Begin
Write( Nhap do dai canh day: as ); Readin (a):
Write( Nhap do dai chieu cao: ha’): Readin (h):
Writeln(‘Dien tich hinh tam giac la: S-,a h/2+10:2):
Readin:
End.
Dịch, sửa lỗi (nếu có) và chạy chương trinh với các bộ dữ liệu (a; h) là:
S: 7: (123; 45)
Cần gấp ạ
program tinh_dien_tich_hinh_tam_giac;
uses crt;
var a, h: real;
begin
clrscr;
write(‘Nhap do dai canh day: ‘); readln(a);
write(‘Nhap do dai chieu cao: ‘); readln(h);
writeln(‘Dien tich tam giac la: S = ‘,(a*h)/2:10:2);
readln
end.
CHÚC BẠN HỌC TỐT!!!