a)
*Xác định bài toán:
INPUT: cạnh a, chiều cao tương ứng h
OUTPUT: diện tích tam giác S
*Mô tả thuật toán:
- Bước 1: Nhập a, h
- Bước 2: S:=a*h/2
- Bước 3: In ra S và kết thúc
b)
Program nyg;
Uses crt;
Var a,h,S:real;
Begin
Writeln ('Nhap canh a');
Readln (a);
Writeln ('Nhap canh h');
Readln (h);
S:=(a*h)/2;
Writeln ('Dien tich hinh tam giac',S);
Readln;
End.