Tin học Viết chương trình tính tổng các số lẻ trong dãy số gồm N số được nhập vào từ bàn phím 16/07/2021 By Camila Viết chương trình tính tổng các số lẻ trong dãy số gồm N số được nhập vào từ bàn phím
Program tong_le; Var A:array[1..100] of integer; i,n,S:integer; Begin FOr i:=1 to n do Begin Writeln(‘A[‘,i’]=’);Reafln(A[i]); End; Write(‘Tong cac so le la: ‘); For i:=1 to n do If A[i] mod 2<>0 then S:=S+A[i]; Write(A[i]); Readln; End. Chúc bạn học tốt nhé Trả lời