Tại một văn phòng của Ủy ban nhân dân tỉnh có M người nộp hồ sơ, theo thứ tự bắt số từ 1 đến M. Tùy theo loại hồ sơ mà người ta xử lí trong thời gian nào đó củ
Tại một văn phòng của Ủy ban nhân dân tỉnh có M người nộp hồ sơ, theo thứ tự bắt số từ 1 đến M. Tùy theo loại hồ sơ mà người ta xử lí trong thời gian nào đó của người thứ i là ti (i=1..M). Yêu cầu: Viết chương trình nhập vào số nguyên dương M (0<M<=100) và dãy số nguyên dương t1, t2, , tn (1<=ti<=10; i=1..M) theo thứ tự là số người nộp hồ sơ và thời gian xử lí hồ sơ. Hãy tính thời gian (phút) chờ của người thứ K (K=1..M) và chở bao nhiêu người để đến lượt mình. Mong giải nhanh ạ
Lời giải 1 :
Code
uses crt;
var m,i,s,k: integer;
var a: array[1..1000] of integer;
begin
s:=0;
readln(m);
for i:=1 to m do read(a[i]);
readln(k);
writeln('Nguoi thu ',k,' phai cho ',k-1,' nua');
for i:=1 to k-1 do s:=s+a[i];
writeln('Thoi gian cho la ',s,' phut');
end.
Thảo luận
Lời giải 2 :
uses crt;
var T : array [1 .. 100] of byte;
i, M, K, S : integer;
begin
clrscr;
write('Nhap M, K = '); readln(M, K);
S := 0;
write('Nhap thoi gian cho : ');
for i := 1 to M do read(T[i]);
writeln('Nguoi thu ', K ,' phai cho ', K - 1 ,' nguoi');
for i := 1 to K - 1 do S := S + T[i];
writeln('Thoi gian cho la ', S ,' phut');
readln
end.
Có thể bạn quan tâm
Bạn có biết?
Tin học, tiếng Anh: informatics, tiếng Pháp: informatique, 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 (ảo). Với cách hiểu hiện nay, 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.
Nguồn : Wikipedia - Bách khoa toàn thưTâm sự 8
Lớp 8 - Năm thứ ba ở cấp trung học cơ sở, học tập bắt đầu nặng dần, sang năm lại là năm cuối cấp áp lực lớn dần nhưng các em vẫn phải chú ý sức khỏe nhé!
Nguồn : ADMIN :))Xem thêm tại https://loigiaisgk.com/cau-hoi or https://giaibtsgk.com/cau-hoi
Copyright © 2021 HOCTAPSGK