Bài 1: (6 điểm). Tàu cập cảng.
Một tư nhân có hai tàu thủy chuyên vận chuyển hàng khô rất uy tín đối với khách hàng. Được uy tín như vậy là do lịch trình cập cảng của các tàu đảm bảo số ngày quy định, an toàn và cập cảng ngày nào thì cũng rời cảng trong chính ngày đó. Tại cảng chính, tàu thứ nhất cứ k ngày cập cảng 1 lần; tàu thứ hai cứ s ngày cập cảng 1 lần (k¹s).
Yêu cầu: Lập trình tính xem nếu hai tàu cùng rời cảng thì thời gian ngắn nhất gặp lại nhau tại cảng đó là bao nhiêu ngày?
- Dữ liệu vào: Đọc từ file văn bản TAU.INP chứa một dòng gồm hai số nguyên dương k và s, hai số cách nhau ít nhất một ký tự trống.
- Dữ liệu ra: Kết quả ghi ra file văn bản TAU.OUT thời gian ngắn nhất.
TAU.INP
TAU.OUT
6 4
12
pascal
var k,s,a,b,t:int64;
function GCD(x,y:int64):int64;
begin
while y<>0 do
begin
t:=y;
y:=x mod y;
x:=t;
end;
GCD:=x;
end;
begin
assign(input,'TAU.INP');reset(input);
assign(output,'TAU.OUT');rewrite(output);
readln(k,s);
writeln(k*s div GCD(k,s));
readln;
end.
Tin học là một ngành khoa học chuyên nghiên cứu quá trình tự động hóa việc tổ chức, lưu trữ, xử lý và truyền dẫn thông tin của một hệ thống máy tính cụ thể hoặc trừu tượng. Tin học bao hàm tất cả các nghiên cứu và kỹ thuật có liên quan đến việc mô phỏng, biến đổi và tái tạo thông tin. Hãy tận dụng sức mạnh của tin học để giải quyết các vấn đề và sáng tạo ra những giải pháp mới!
Lớp 7 - Năm thứ hai ở cấp trung học cơ sở, một chuỗi quay mới lại đến và chúng ta vẫn bước tiếp trên con đường học sinh. Học tập vẫn là nhiệm vụ chính, hãy luôn kiên trì và không ngừng cố gắng!
Copyright © 2021 HOCTAPSGK