Quảng cáo
1 câu trả lời 184
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' );
readln
End.
Quảng cáo
Bạn cần hỏi gì?
Câu hỏi hot cùng chủ đề
-
Đã trả lời bởi chuyên gia
149546 -
Đã trả lời bởi chuyên gia
99939 -
Đã trả lời bởi chuyên gia
97535 -
Đã trả lời bởi chuyên gia
80250 -
Đã trả lời bởi chuyên gia
73038 -
Đã trả lời bởi chuyên gia
56128 -
Đã trả lời bởi chuyên gia
55497
Gửi báo cáo thành công!
