LH Quảng cáo: lazijsc@gmail.com

Bài tập  /  Bài đang cần trả lời

04/03/2022 22:05:28

Nhập vào List a có n số. Thực hiện các công việc sau

làm câu 10 và 111
----- Nội dung dịch tự động từ ảnh -----
In
for i in range(n):
if l[i] In:
print(a[i-In+1:i+1])
5 Bài tập tự giải
Nhập vào List a có n số. Thực hiện các công việc sau:
1. Tổng các phần tử của dãy
2. Số lượng các số hạng dương và tổng của các số hạng dương.3. Trung bình cộng
của cả dãy. Trung bình cộng các phần tử duơng của mảng. Trung bình cộng các phầ.
tử âm của màng
4. Chi số của số hạng dương đầu tiên của dãy
5. Chi số của số hạng âm cuối cùng của dãy
6. Số hạng lớn nhất của dãy và chi số của nó
7. Số hạng âm lớn nhất của dãy và chi số của nó
8. Xuất các số nguyên tổ trong mảng
9. Giá trị lớn thứ nhì của dãy và các chi số của các số hạng đạt giá trị lớn nhì
10. Số lượng các số dương liên tiếp nhiều nhất
11. Số lượng các số hạng dương liên tiếp có tổng lớn nhất
12. Số lượng các số hạng âm liên tiếp có tổng lớn nhất
13. Số lượng các số hạng liên tiếp đan dấu nhiều nhất (dãy số hạng liên tiếp đư
là đan dấu nếu tích hai số liên tiếp âm)
ma các phần từ không tăng nhiều nhất
Y (nguyên) cho trước
1 trả lời
Hỏi chi tiết
693
1
0
Avicii
04/03/2022 22:06:16
+5đ tặng
Câu 10:

{So luong so hang duonglien tiep nhieu nhat}

uses crt;

 var a:array[1..100] of longint;

 i,n,sld,j,max:integer;

 BEGIN

 clrscr;

 write('Vao n=');readln(n);</strong></p><p><strong> for i:=1 to n do</strong></p><p><strong>    begin  write('a[',i,']=');readln(a[i]);end;

i:=1; max:=0;

While i<=n do

if a[i]>0 then

     begin

     sld:=0; j:=i;

        while ((j<=n)and(a[j]>0)) do

                   begin

                    inc(sld);

                     inc(j);

                    end;

           if sld>max  then max :=sld;

               inc(i,sld);

 end

Else inc(i);

writeln('So luong duong lien tiep nhieu nhat la:',max);

readln;

END.

Mở khóa để xem toàn bộ nội dung trả lời

(?)
Bạn đã đạt đến giới hạn của mình. Bằng cách Đăng ký tài khoản, bạn có thể xem toàn bộ nội dung trả lời
Cải thiện điểm số của bạn bằng cách đăng ký tài khoản Lazi.
Xem toàn bộ các câu trả lời, chat trực tiếp 1:1 với đội ngũ Gia sư Lazi bằng cách Đăng nhập tài khoản ngay bây giờ
Tôi đã có tài khoản? Đăng nhập

Bạn hỏi - Lazi trả lời

Bạn muốn biết điều gì?

GỬI CÂU HỎI
Học tập không giới hạn cùng học sinh cả nước và AI, sôi động, tích cực, trải nghiệm
Bài tập Tin học Lớp 9 mới nhất

Hôm nay bạn thế nào? Hãy nhấp vào một lựa chọn, nếu may mắn bạn sẽ được tặng 50.000 xu từ Lazi

Vui Buồn Bình thường

Học ngoại ngữ với Flashcard

×
Trợ lý ảo Trợ lý ảo
×
Gia sư Lazi Gia sư