uses crt;var a:array[1..1000000] of longint; n,i,d:longint;begin clrscr; write('Nhap n: '); readln(n); for i:=1 to n do begin write('a[',i,']: '); readln(a[i]); if a[i] mod 2=0 then inc(d); end; writeln('Co ',d,' so chan'); readln;end.
Program bai_tap ;
Uses crt ;
Var A: array [1..150] of integer ;
i,n,d: integer;
Begin
Write('nhap n=');
Readln (n);
For i:=1 to n do
Write ('nhap phan tu thu ',i,' =');
Readln (A[i]);
end;
d:=0;
If A[i] mod 2=0 then
d:=d +1;
Writeln('So so chan trong day la:',d);
Readln
End.
Giải giúp mik câu 11 vs mik cần gấp
Mọi người giúp em giải bài này với ạ :((
a) ở địa phương em (đất nước em) có di tích lịch sử nào? Nêu hiểu biết của em về di tích lịch sử đó ? b) em sẽ làm gì để giữ gìn và phát huy những giá trị văn hóa ở địa danh đó?
Chỉ e bài này với ạ 🤗🤗🤗🤗🤗🤗🤗🤗🤗
em hiểu thế nào là tỉ lệ 1:1 1:2 giúp em với
kể về tâm sự của một cuốn sách bị bỏ quên lớp 9 ngắn
Em sẽ làm những gì khi ba, mẹ em mệt và trở nên khó tính
Giúp e vs ạ :(((((((((((((camonmn...........................
Em hiểu thế nào về câu đâu cần thanh niên có đâu khó có thanh niên
Giúp mình vs ạ Tí mình phải nộp òi 🙏🙏😭Năn nỉ ó
Loga.vn - Cộng Đồng Luyện Thi Trực Tuyến