Nhập vào thời gian 1 công việc nào đó là x giây. Hãy chuyển đổi và viết ra màn hình số thời gian trên dưới dạng bằng bao nhiêu giờ, bao nhiêu phút, bao nhiêu giây?
Câu trả lời được xác thực chứa thông tin chính xác và đáng tin cậy, được xác nhận hoặc trả lời bởi các chuyên gia, giáo viên hàng đầu của chúng tôi.
uses crt; var gio,phut,giay,x: longint; begin clrscr; write('Nhap vao so giay: '); readln(x); gio:= x div 3600; x:=x mod 3600; phut:=x div 60; x:=x mod 60; writeln('Ket qua = ', gio,' gio : ', phut, ' phut : ', x, ' giay'); readln end.
uses crt; var gio,phut,giay,x: longint; begin clrscr; write('Nhap vao so giay: '); readln(x); gio:= x div 3600; x:=x mod 3600; phut:=x div 60; x:=x mod 60; writeln (x,' giay bang: ',gio,' gio / ',phut,' phut / ',x,' giay'); readln; end.