Chủ đề:
Trái đấtCâu hỏi:
Khu vực giờ gốc là 3h thì khu vực giờ 10, khu vực giờ 20 là mấy h.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 | program HelloWorld; var i :Integer; begin writeln('Giai bai toan dan gian bang Pascal'); writeln('Vua ga vua cho'); writeln('Bo lai cho tron'); writeln('Ba muoi sau(36) con'); writeln('Mot tram(100) chan chan'); writeln('Hoi may ga, may cho?'); for i:= 9 to 25 do if((i * 2 + (36 - i) * 4) = 100) then writeln('So ga la: ', i); writeln('So cho la: ', 36 - i); end. |