Cập nhật ảnh bìa
Tải lên
Từ máy tính của bạn
Cập nhật ảnh đại diện
Tải lên
Từ máy tính của bạn
Học tại trường
Chưa có thông tin
Đến từ
Bà Rịa - Vũng Tàu , Chưa có thông tin
Số lượng câu hỏi
5
Số lượng câu trả lời
2
Điểm GP
0
Điểm SP
0
Người theo dõi (0)
Đang theo dõi (4)
Chủ đề:
Bài 9. Làm việc với dãy sốCâu hỏi:
Em hãy sắp xếp các câu lệnh sau và viết lại thành 1 chương trình hoàn chỉnh . Sau đó cho biết chương trình đó thực hiện công việc gì ? Writeln ( ' Tong cac phan tu le trong mang la : ' , tle ) ;
End.
Program Bai _ tap _ day _ so ;
If a [ i ] mod 2 = 0 then chan : = tchan + a [ i ] Readln ;
a:array [ 1 . . 100 ] of Integer ;
Begin
Clrscr ;
write ( ' Nhap so phan tu cua mang : ' ) ; Readln ( n ) ;
For i : = 1 to n do readln ( a [ i ] ) ;
For i : = 1 to n do
Write ( ' Nhap phan thu thu ' i ) ;
Writeln ( ' Tong cac phan tu chan trong mang la : ' , tchan ) ;
Begin
End ;
tchan : = 0 ; tle : = 0 ;
Else tle : = tle + a [ i ] ;
Uses crt ;
Var i , n , tchan , tle : Integer ;