Viết chương trình nhập vào mảng 1 chiều gồm n phần tử in mảng vừa nhập ra màn hình
viết chương trình nhập mảng 1 chiều gồm n phần tử và in ra màn hình các số chẵn trong mảng
Hỏi:
viết chương trình nhập mảng 1 chiều gồm n phần tử và in ra màn hình các số chẵn trong mảng
viết chương trình nhập mảng 1 chiều gồm n phần tử và in ra màn hình các số chẵn trong mảng
Đáp:
Program sochan;
uses crt;
var n，i:integer; a:array[1..100] of integer;
begin
clrscr; write[‘nhap n:’];readln[n];
for i:=1 to n do
begin write[‘a[‘i’]=’];readln[a[i]];
end;
for i:=1 to n do
if a[i] mod 2= then writeln[a[i]，’ la so chan’]; readln;
end.
chúc bạn học tốt nha :]]
Program sochan;
uses crt;
var n，i:integer; a:array[1..100] of integer;
begin
clrscr; write[‘nhap n:’];readln[n];
for i:=1 to n do
begin write[‘a[‘i’]=’];readln[a[i]];
end;
for i:=1 to n do
if a[i] mod 2= then writeln[a[i]，’ la so chan’]; readln;
end.
chúc bạn học tốt nha :]]
Program sochan;
uses crt;
var n，i:integer; a:array[1..100] of integer;
begin
clrscr; write[‘nhap n:’];readln[n];
for i:=1 to n do
begin write[‘a[‘i’]=’];readln[a[i]];
end;
for i:=1 to n do
if a[i] mod 2= then writeln[a[i]，’ la so chan’]; readln;
end.
chúc bạn học tốt nha :]]