YOMEDIA
NONE

Viết chương trình Pascal thực hiện công việc nhập 20 phần tử có giá trị nguyên cho mảng B với B là mảng 1 chiều nhập từ bàn phím tính tổng các phần tử có giá trị dương trong mảng?

Câu 1: Cho đoạn chương trình:

S:=0;

For i:=1 to 5 do S:=S+1;

a) Cho biết giá trị của S

b) Đoạn chương trình trên thực hiện bao nhiêu lần lặp

Câu 2:

Viết chương trình bằng ngôn ngữ lập trình pascal thực hiện công việc nhập 20 phần tử có giá trị nguyên cho mảng B(1 chiều, nhập từ bàn phím)

a) Tính tổng các phần tử có giá trị dương trong mảng

b) Tính tổng các phần tử có giá trị lẻ trong mảng

*Giúp mình nha, sắp thi rùi

Theo dõi Vi phạm
ATNETWORK

Trả lời (1)

  • câu 1 a) S=5

    b)Doan chuong trinh thuc hien 5 vong lap

    câu 2:

    program tinhtong;

    uses crt;

    var B:array [1..20] of integer;

    le,tong,i:integer;

    begin

    writeln ('nhap gia tri cua mang B');

    for i:=1 to 20 do

    readln (B[i]);

    for i:=1 to 20 do

    begin

    if A[i] mod 2=1 then le:=le+A[i];

    if A[i]>0 then tong:=tong+A[i];

    end;

    writeln ('tong cac so duong la',tong);

    writeln ('tong cac so le la',le);

    readln

    end.

      bởi Đỗ Phương Mai 30/10/2018
    Like (0) Báo cáo sai phạm

Nếu bạn hỏi, bạn chỉ thu về một câu trả lời.
Nhưng khi bạn suy nghĩ trả lời, bạn sẽ thu về gấp bội!

Lưu ý: Các trường hợp cố tình spam câu trả lời hoặc bị báo xấu trên 5 lần sẽ bị khóa tài khoản

Gửi câu trả lời Hủy
 
NONE

Các câu hỏi mới

AANETWORK
 

 

YOMEDIA
ATNETWORK
ON