viết chương trình các bài toán sau: viết chương trình và in kết quả của diện tích s của hình tam giác biết độ dài 1 cạnh và chiều cao tương ứng với cạnh đó (a,h là các số nguyên và được thu nhập từ bàn phím ,s=ah/2) b.viết chương trình nhập chiều cao của hai bạn Nam và Anh ,in ra màn hình kết quả so sánh chiều cao của hai bạn
2 câu trả lời
a)
Phần khai báo bạn tự viết nhé.
Var a,h: integer ;
S: real;
Begin
Writeln(' Do dai canh a la:' ); Readln(a);
Writeln(' Chieu cao h la:' ); Realdn(a);
S:=a*h/2;
Writeln(' Dien tich hinh tam giac la: ', 3:2);
Realdn;
End.
Program (bạn tự viết tên khai báo nhé) ;
Var a , h : integer ;
S : real ;
Begin
Writeln ( ' Do dai canh a la : ' ); Readln (a) ;
Writeln ( ' Chieu cao cua h la : ' ); Realdn ( h ) ;
S : = a*h/2 ;
Writeln ( ' Dien tich hinh tam giac la : ', 3 : 2 ) ;
Realdn ;
End.