Program tong;
Uses crt;
Var a:array[1..100] of integer;
n,s,i:integer;
Begin
Clrscr;
Write('nhap so phan tu cua mang:n=');readln(n);
For i:=1 to n do
Write('a[',i,']='); readln(a[i]);
End;
For i:= 1 to n do
S:=0;
S:= s+a[i];
Write('tong cua cac phan tu trong mang:s=',s);
Readln;
End.
program ct;
uses crt;
var A:array[1..100] of integer;
i:integer;
S:longint;
begin clrscr;
for i:=1 to 100 do
begin
write('Nhap so thu ',i,': '); readln(A[i]);
end;
S:=S+A[i];
write('Tong cua 100 so la: ',S);
readln;
end.
Học tốt!
Thầy cô hãy xây dựng kế hoạch giảng dạy nội dung giáo dục an toàn giao thông trong môn ngữ văn
Tính nhanh a) (-77 - 23) - (567 - 77) b) 7 - (-812 - 45) + (55 - 812) c) (-13) - [2022 - (23 +2011)] d) (72 - 56) - [(-123) + (-28+44)
Qua các bài ca dao mà em đã học ở kì một, nó đem cho em cảm xúc j
"Từlàng,Thủyđitắtquađồngđểrabếntàuđiện.Sớmđầuthumátlạnh.Giữanhữngđámmâyxámđục,vòmtrờihiệnranhưnhữngkhoảngvựcxanhvòivọi." Đoạnvăntrêncó ? quanhệtừ.
giải thích từ đồng âm và làm bài 3 giúp mik với Làm hoặc ko làm bài 4 cũng được
viết 1 bài văn nêu cảm nghĩ của em về hình ảnh người bà và tình bà cháu trong bài tiếng gà trừa
Mọi người ơi giúp mình với ạ... Cảm ơn nhìu:
giải các phương trình sau 13.1/x-1≤2 14.-4x+1/3x+1≤-3 15.x/x-5≥1/2 16.4x+3/2x-5≤3 17.x^2-3x+1/x^2-1<1 18.x+4/x+2≤2x+1/2x-1 19.2x^2+x/1-2x≥1-x 20.x+2/x-1>x+4/x-3 21.1/x+2/x+4<3/x+3 22.1/x+1+2/x+2≤3/x+3 23.(2x-1)(x-3)^4/-x-1≥0 24.(x+2)^4(x+6)/(x-7)^3(x-2)^2≥0
Cho S = 5 + 5^2 + 5^3 + 5^4 + ...... + 5^57 Chứng minh S chia hết cho 31.
sưu tầm 1 bài ca dao, dân ca và nêu nội dung cụ thể
Loga.vn - Cộng Đồng Luyện Thi Trực Tuyến
