Tin học viết ct nhập vào 1 dãy gồm 10 số nguyên. sau đó kt và đưa ra màn hình các số có giá trị lớn hơn 5 help me plsss cause mai mk thi rồi TT 18/07/2021 By Isabelle viết ct nhập vào 1 dãy gồm 10 số nguyên. sau đó kt và đưa ra màn hình các số có giá trị lớn hơn 5 help me plsss cause mai mk thi rồi TT
program lon_hon5; uses crt; var A:array[1..10] of integer; i:byte; begin clrscr; for i:=1 to 10 do begin write(‘Nhap so thu ‘,i,’: ‘); readln(A[i]); end; for i:=1 to 10 do if A[i]>5 then write(A[i],’ ‘); readln; end. Trả lời
var a: array[1..10] of integer; i: byte; Begin For i:=1 to 10 do Begin Write(‘a[‘, i, ‘] = ‘); readln(a[i]); End; For i:=1 to 10 do If a[i]>5 then write(a[i], ‘ ‘); Readln End. Trả lời