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 trình với các bộ dữ liệu (a; h) là:
(15;7);(123; 45)
Program tinh_dien_tich_hinh tam_giac;
Var a, h: real;
Begin
Write(‘Nhap do dai canh day: a = ‘); Readln(a);
Write( Nhap do dai chieu cao: ha = ‘); Readln(h);
Writeln(‘Dien tich hinh tam giac la: S = ‘,a*h/2:10:2);
Readln
End.