var a: array[1..250] of integer;
S: word;
i, n: byte;
Begin
Write('n = '); readln(n);
S:=0;
For i:=1 to n do
Write('a[', i, '] = '); readln(a[i]);
if (a[i]>=3) and (a[i]<=9) then
S:=S+a[i];
End;
Write('tong la: ', s);
Readln
End.
Nhân tố sinh thái của môi trường là gì
Bạn Q năm nào cx đạt HSG nhưng lại sống xa cách với các bạn trong lớp. Vì cho rằng mình học giỏi nên Q không muốn học nhóm vs các bạn khác. Nếu là bạn của Q, em sẽ khuyên Q điều
viet chuong trinh tinh tong cua cac so trong doan tu 3 den 9 trong day day so nguyen nhap tu ban phim
Viết chương trình pascal tính tổng các số tự nhiên trong phạm vi từ 5-45(dùng lệnh lặp while.....do)thông báo kết quả ra màn hình Giúp mình với nhé
Tính đạo hàm theo định nghĩa 2 câu giúp em
"Tháng bảy kiến đàn,đại..... hồngthủy."
Giúp mình với ạ Giải chi tiết giúp mình với
Các bạn giúp mình nha sắp thi rùi
Các bạn giúp mình hết nha sắp thi rủi
Mình đang cần gấp. Trừ câu 2 nha.
Loga.vn - Cộng Đồng Luyện Thi Trực Tuyến