Những câu hỏi liên quan
DA
Xem chi tiết
H24
Xem chi tiết
HQ
3 tháng 10 2017 lúc 19:59

Mình giải thích được, tuy nhiên để hiểu rõ hơn, vào trang web sau để xem bạn nhé:

https://bachkhoa-aptech.edu.vn/cac-thanh-phan-co-ban-trong-may-tinh.html

Bình luận (1)
TQ
Xem chi tiết
NT
6 tháng 3 2020 lúc 20:52

uses crt;

var a:array[1..100]of integer;

i,n,t:integer;

begin

clrscr;

write('n='); readln(n);

if (n>0) and (n<=100) then

begin

t:=0;

for i:=1 to n do

begin

write('a[',i,']='); readln(a[i]);

if (a[i] mod 2=0) or (a[i] mod 2=1) then t:=t+a[i];

end;

writeln('tong cac phan tu chan hoac le trong day la: ',t);

end

else writeln('vui long nhap lai');

readln;

end.

Bình luận (0)
 Khách vãng lai đã xóa
TQ
Xem chi tiết
NL
19 tháng 10 2023 lúc 8:05

ko hiểu

Bình luận (0)
TN
22 tháng 10 2023 lúc 11:29

bàn phím,chuột,...

Bình luận (0)
NT
Xem chi tiết
NT
Xem chi tiết
DH
1 tháng 2 2016 lúc 12:29

Bn lười z ??? tự lm một số bài đi nha,bài nào khó thì hẵng hỏi ><

duyệt đi

Bình luận (0)
NT
Xem chi tiết
KT
Xem chi tiết
LA
Xem chi tiết
NT
22 tháng 2 2022 lúc 8:21

uses crt;

var a:array[1..250]of integer;

i,n,t:integer;

begin

clrscr;

readln(n);

t:=0;

for i:=1 to n do readln(a[i]);

for i:=1 to n do write(a[i]:4);

writeln;

for i:=1 to n do t:=t+a[i];

writeln(t);

readln;

end.

Bình luận (0)