Bài 6. Câu lệnh điều kiện

Nguyen Kim Anh

Viết chương trình nhập từ bàn phím số học sinh nam và số học sinh nữ . In ra màn hình kết quả so sánh của nam và nữ (nếu nhiều hơn thì nhiều hơn bao nhiêu)

Eriken
11 tháng 12 2018 lúc 19:45

var a,b,C : integer ;

begin

wirte('nhap so hoc sinh nam'); readln(a);

wirte('nhap so hoc sinh nu'); readln(b);

If a>b then writeln('nam nhieu hon nu') else writeln('nu nhieu hon nam');

begin

C:=a-b;

C:=b-a

end;

write('hon nhau so ban la',C);

readln

end.

Bình luận (0)
Trương Quang Dũng
10 tháng 1 2019 lúc 20:56

program bai1;

var x,y:longint;

begin

write('So hs nam: ');readln(x);

write('So hs nu: ');realn(y);

if x<y then write('Nam it hon nu (it hon ',y-x,' hs')

else if x>y then write('Nam nhieu hon nu (nhieu hon ',x-y,' hs')

else if x=y then write('Nam=nu ');

readln

end.

Bình luận (0)

Các câu hỏi tương tự
Ngô Vân Minh Châu
Xem chi tiết
bich lien
Xem chi tiết
An An
Xem chi tiết
Quân
Xem chi tiết
Han Nguyen
Xem chi tiết
Duy Thanh Bùi
Xem chi tiết
Duy Thanh Bùi
Xem chi tiết
Duy Thanh Bùi
Xem chi tiết
Ngoc Thanh
Xem chi tiết