Nguyễn Tuấn Tú
Hỏi từ APP VIETJACK
Viết chương trình pascal sử dụng biến đếm mảng để nhập 1 dãy số và hiển thị dãy số ra màn hình.tổng các giá trị là các số lẻ
- yêu cầu nhập độ dài của dãy số n
-nhập dãy số hiển thị dãy số
-in ra màn hình tổng các số lẻ
Giúp với ạ
- yêu cầu nhập độ dài của dãy số n
-nhập dãy số hiển thị dãy số
-in ra màn hình tổng các số lẻ
Giúp với ạ
Quảng cáo
1 câu trả lời 295
program CountArray;
var
n, i, sum, num: integer;
begin
sum := 0; // khởi tạo tổng bằng 0
writeln('Nhap do dai cua day so: ');
readln(n);
writeln('Nhap day so:');
for i := 1 to n do
begin
readln(num);
writeln('Phan tu thu ', i, ' la: ', num);
if num mod 2 = 1 then // kiểm tra số lẻ
sum := sum + num; // cộng vào tổng nếu là số lẻ
end;
writeln('Tong cac so le la: ', sum);
readln;
end.
var
n, i, sum, num: integer;
begin
sum := 0; // khởi tạo tổng bằng 0
writeln('Nhap do dai cua day so: ');
readln(n);
writeln('Nhap day so:');
for i := 1 to n do
begin
readln(num);
writeln('Phan tu thu ', i, ' la: ', num);
if num mod 2 = 1 then // kiểm tra số lẻ
sum := sum + num; // cộng vào tổng nếu là số lẻ
end;
writeln('Tong cac so le la: ', sum);
readln;
end.
Quảng cáo
Bạn hỏi - Chuyên gia trả lời
Bạn cần hỏi gì?
Câu hỏi hot cùng chủ đề
-
Hỏi từ APP VIETJACK45513
-
Hỏi từ APP VIETJACK28408
Thành viên hăng hái nhất trong tuần
-
۶ৎ
490 điểm
-
ッ¢ασɢιαнâиᵛᶰシ 80 điểm
-
★꧁☁︎જ⁀➴✞༺S͜͡øN͜͡G͜͡ ༒︎ N͜͡G͜͡ư༻✞જ⁀➴☁︎꧂★
60 điểm
-
đêm đêm đi đái đau dái vì em❤️
45 điểm
-
$\color{#FA8072}{౨ৎ𝒽ế𝓉౨ৎ𝓉𝒽ờ𝒾 ౨ৎ𝓹𝓻𝓲𝓶𝓮シ}$
45 điểm
-
Hảo Hảo
35 điểm
-
`color{Yellow }text{Sun🌞}`
30 điểm
-
Hồng Nhung Nguyễn 25 điểm
-
ngọc Hà nguyễn ngọc Hà 20 điểm
-
Khue Nguyễn 20 điểm
-
Phuong Anh Nguyen Hoang 20 điểm
-
Khanh Pham Duy 20 điểm
-
Tuấn Anh Phạm 20 điểm
-
Trà Đào 20 điểm
-
Nghi Nguyễn 20 điểm
Rút gọn
Bài viết mới nhất Lớp 8
-
4 năm trước11185
-
4 năm trước10592
-
4 năm trước9253
-
4 năm trước9442
-
4 năm trước9004
Gửi báo cáo thành công!
