Tin học viết chuoưng trình nhập vào dãy số gồm n số nguyên dương +IN DÃY SỐ N RA MÀN HÌNH +TÍNH TỔNG BÌNH PHƯƠNG CÁC SỐ LẺ 16/07/2021 By Ayla viết chuoưng trình nhập vào dãy số gồm n số nguyên dương +IN DÃY SỐ N RA MÀN HÌNH +TÍNH TỔNG BÌNH PHƯƠNG CÁC SỐ LẺ
uses crt;var lst:Array[1..100] of integer; i,n,tong:longint;Begin clrscr; write(‘Nhap n: ‘); readln(n); for i:=1 to n do Begin write(‘Phan tu thu ‘,i,’ = ‘); readln(lst[i]); if lst[i] mod 2 = 1 then tong:=tong+lst[i]*lst[i]; end; for i:=1 to n do write(lst[i],’ ‘); writeln; write(‘Tong la: ‘,tong); readln;end. Trả lời