Nhập từ bàn phím tuổi của cha và con (tuổi của cha hơn tuổi con ít nhất là 25)

Ngọc Nguyễn Ngày: 15-03-2023 Tổng hợp kiến thức

287

Top 1000 câu hỏi thường gặp môn Tin học có đáp án (phần 1) hay nhất được biên soạn và chọn lọc giúp bạn ôn luyện và đạt kết quả cao trong bài thi môn Tin học.

Nhập từ bàn phím tuổi của cha và con (tuổi của cha hơn tuổi con ít nhất là 25)

Câu 58: Nhập từ bàn phím tuổi của cha và con (tuổi của cha hơn tuổi con ít nhất là 25). Đưa ra màn hình bao nhiêu năm nữa thì tuổi cha gấp đôi tuổi con.

Lời giải:

program tuoi_cha_con;

uses crt;

var tuoicha, tuoicon, nam: longint;

begin

clrscr;

write('Nhap tuoi cha va con(tuoicha-tuoicon>=25) ;

readln(tuoicha,tuoicon); nam:= 0;

while tuoicha<>2*tuoicon do begin

tuoicha:= tuoicha + tuoicon:= tuoicon + 1; nam:= nam +1;

end;

writeln ( ' Sau ', nam, ' nam, tuoi cha gap doi tuoi con' );