Thứ Bảy, 13 tháng 7, 2019

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

Nhập ma trận A.
a) Tìm hàng có tổng lớn nhất.
b) Tìm tất cả các hàng có tổng lớn nhất.
Dữ liệu nhập: cho trong file Bai.inp gồm:
- Dòng 1: Số nguyên n là số dòng và m là số cột của ma trận
- Các dòng còn lại là giá trị từng phần tử của ma trận.
Dữ liệu xuất: Xuất ra file Bai.out gồm :
-         Dòng 1: Xuất hàng có tổng lớn nhất.
-         Các dòng tiếp theo là vị trí của hàng có tổng lớn nhất.
Ví dụ:
FILE BAI .INP:
3    4
1    2    3    4
1    2    1    1
4    2    1    3
FILE BAI.OUT:
a) Hàng 1 có tổng lớn nhất ( hoặc hàng 3)
b) Các hàng có tổng lớn nhất là:
    1
    3

1 nhận xét:

  1. Uses crt;
    Var n,m,w,max,i,j:longint;
    f:array[1..10000] of longint;
    Begin
    readln(n);
    readln(m);
    max:=0;
    For i:=1 to m do
    Begin
    For j:=1 to n do
    Begin
    readln(w);
    f[i]:=f[i]+w;
    end;
    If f[i]>max then max:=f[i];
    end;
    For i:=1 to m do
    If f[i]=max then Write(i,' ');
    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