1.Viết chương trình của 1 tam giác có phải là tam giác cân hay không biết 3 cạnh được nhập từ bàn phím
2. Viết chương trình nhập số A thì cho biets số đó chẳng hay lẻ
3. Viết chương trình so sánh chiều cao của 2 bạn
4. Viết chương trình tìm số lớn nhất của số tự nhiên được nhập từ bàn phím
5. Viết chương trình thông báo điểm . Nếu điểm bé hơn 5 thì đáng hỏng ngược lại thì đánh đậu
3.
program So_sanh_chieu_cao;
uses Crt;
var Van, Nguyen: Real;
begin
clrscr;
write('Nhap chieu cao cua Van:'); readln (Van);
write('Nhap chieu cao cua Nguyen:'); readln (Nguyen);
If Van>Nguyen then writeln ('Ban Van cao hon') else
If Van<Nguyen then writeln ('Ban Nguyen cao hon')
else writeln ('Hai ban cao bang nhau');
readln
end.
