Quảng cáo
1 câu trả lời 2445
2 năm trước
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
Câu hỏi hot cùng chủ đề
-
Hỏi từ APP VIETJACK1 42128
-
Hỏi từ APP VIETJACK20697
Gửi báo cáo thành công!