Khi nào tuổi cha gấp đôi tuổi con

0

Đề bài: Nhập vào tuổi của cha và con hãy cho biết sao bao nhiêu năm thì tuổi cha gấp đôi tuổi con ?

Program tinh_tuoi_cha_va_con;
Uses crt;
Var tcha,tcon,i:byte;
Begin
   clrscr;
   write('tuoi cua cha :');
   readln(tcha);
   write('tuoi cua con :');
   readln(tcon);
   {i la so nam, se tang len tu tu}
   i:=0;
   While tcha < > 2*tcon do
      begin
         tcha:=tcha+1;
         tcon:=tcon+1;
         i:=i+1;
      end;
   writeln('Sau ',i,' nam  cha ',tcha, ' gap 2 tuoi con ',tcon);
   readln;
End.

Mở rộng : Các bạn nên kiểm tra dữ liệu người dùng nhập vào (ví dụ tuổi cha nhỏ hơn tuổi con hoặc tuổi cha nhỏ hơn 18 hay tuổi cha quá lớn) để chương trình hoàn hảo.

Share.

About Author

Quen biết khắp thiên hạ Tri kỷ được mấy người ?

Bình Luận

avatar
  Subscribe  
Thông báo