var s,i:longint;
a: array[1..10] of longint;
begin
for i:=1 to 10 do
write('Nhap phan tu thu ',i);
read(a[i]);
if a[i]>0 then s:=s+a[i];
end;
writeln;
write('Tong la: ',s);
readln
end.
xin hay nhất
5 sao
cảm ơn
ok nha
thank you
chúc bạn học tốt
program nhap_mang;
uses crt;
var A:array[1..10] of integer;
i:integer;
clrscr;
write('Nhap so thu ',i,': '); readln(A[i]);
write('Mang vua nhap la: ');
for i:=1 to 10 do write(A[i],' ');
readln;
mn giúp mik với có mỗi một bài thôi
viết trương trình tính tổng các số tự nhiên từ n đến m (n<m)
so sánh thành tựu về văn hóa của người việt với người chăm có điều giống và khác nhau
Lớp 4A có 21 học sinh nam. Số học sinh nữ bằng 2/3 số học sinh nam. Tính số học sinh của lớp
nêu đặc điểm chung của lãnh thổ VN ? đặc điểm đó có ý nghĩa gì về sự phát triển kinh tế
Theo anh chị Khái niệm nào trong bối cảnh ngày nay mà tác giả
Có gì mình vote 5☆Có gì mình vote 5☆Có gì mình vote 5☆
Mọi người giúp em phần làm văn câu 1 với ạ
tìm 2 số tự nhiên ,biết tỉ số của chúng bằng 2:5 và tích của chúng bằng 40
Từ hạt giống trong câu chúng ta đều có hạt sống của riêng mình và chỉ cần cố hết sức để hạt giống ấy nở hoa có ý nghĩa gì
Loga.vn - Cộng Đồng Luyện Thi Trực Tuyến
