Quảng cáo
1 câu trả lời 2822
Program doi_gio_phut_giay;
Uses crt;
Var gio, phut,giay, x:longint;
Begin
Clrscr;
Writeln('doi sang gio phut giay');
Write('nhap vao so giay: ');readln(x);
gio:= x div 3600;
x:=x mod 3600;
phut:=x div 60;
x:=x mod 60;
Write('ket qua = ', gio,'gio : ', phut, 'phut : ', x, 'giay');
Readln
End.
Quảng cáo
Bạn cần hỏi gì?
Câu hỏi hot cùng chủ đề
-
Hỏi từ APP VIETJACK45592
-
Đã trả lời bởi chuyên gia
29052 -
Hỏi từ APP VIETJACK28534
Gửi báo cáo thành công!
