Thứ Sáu, 19 tháng 7, 2019

Bài 23 - Giải thuật nhập môn

Cho n chiếc xe Xi (1≤ i ≤ n < 100) cùng đua trên một đường đua. Các xe đua khởi hành ở những thời điểm ti, cách mức đến Đ những khoảng bất kỳ di và với những vận tốc cũng không nhất thiết bằng nhau Vi.
Cho biết ti, di, Vi (nguyên dương nhỏ hơn 10000). Hãy lập trình xác định những xe nào về đích sớm nhất.
Dữ liệu nhập: cho trong file Bai.inp gồm:
- Dòng 1: Số n
- N dòng tiếp theo, mỗi dòng là thời điểm t, khoảng cách d, vận tốc v của xe tương ứng.
Dữ liệu xuất: Xuất ra file Bai.out là số các xe về đích trước nhất (có thể có nhiều xe về đích một luợt)
Ví dụ:
File Bai.inp:
5
1 7 100
2 8 125
3 10 135
5 12 140
6 16 200
File Bai.out
1


2 nhận xét:

  1. Uses crt;
    Var n,i,nho:longint;
    t,v,d:array[1..10000] of longint;
    f:array[1..10000] of real;
    max:real;
    Begin
    readln(n);
    For i:=1 to n do
    Begin
    readln(t[i]);
    readln(d[i]);
    readln(v[i]);
    f[i]:=(d[i]/v[i])+t[i];
    end;
    max:=f[1];
    nho:=1;
    For i:=1 to n do
    If f[i]<max then Begin max:=f[i]; nho:=i; end;
    Write(nho);
    readln;
    end.

    Trả lờiXóa

Dùng nick gmail để bình luận. Nếu lần đầu tiên bạn làm điều này thì hệ thống sẽ chuyển bạn sang trang blogger và hỏi bạn chọn tên hiển thị là gì. Bạn hãy nhập tên hiển thị rồi ok là được. Những lần bình luận sau hệ thống sẽ không hỏi nữa. Cảm ơn!

Bài được xem nhiều nhất