Tin học Viết chương trình nhập số vào N số nguyên và in ra màn hình tổng của các số vừa nhập 18/07/2021 By Parker Viết chương trình nhập số vào N số nguyên và in ra màn hình tổng của các số vừa nhập
var t, s: longint; i, n: byte; a: integer; Begin Write(‘n = ‘); readln(n); S:=0; t:=1; For i:=1 to n do Begin Write(‘a[‘, i, ‘] = ‘); readln(a); If (a mod 2 = 0) then t:=t*a; S:=s+a; End; Writeln(‘tong: ‘, s); Write(‘tich: ‘, t); Readln $\text{#Mong câu trả lời hay nhất ạ}$ $\text{#Chúc bạn học tốt nha}$ $\text{@Vân}$ Trả lời
$#Mod247$ Trả lời: Program kthkII;. uses crt;. var i, n, s, N : integer;. A: array[1..100] of integer;. begin. write(‘Nhap so nguyen N: ‘); readln(N);. write(‘Nhap do dai cua day so thu ‘,d,’ cua day: ‘);readln(e); writeln(‘tong cac so chan trong day so la: ‘,t);readln;end. Trả lời