Bài 1: nhập vào số n bất kì từ bàn phím viết chương trình tính tổng các số chẵn nhỏ hơn n và , in kết quả ra màn hình bài 2: viết chương trình nhập vào 1 dãy số bất kì từ bàn phím rồi tính tổng các số chẵn trong dãy số , in kết quả đó ra màn hình bài 3 : viết chương trình n

seohyunchanyeoltuankhai

2 năm trước

Bài 1: nhập vào số n bất kì từ bàn phím viết chương trình tính tổng các số chẵn nhỏ hơn n và , in kết quả ra màn hình bài 2: viết chương trình nhập vào 1 dãy số bất kì từ bàn phím rồi tính tổng các số chẵn trong dãy số , in kết quả đó ra màn hình bài 3 : viết chương trình nhập vào 1 dãy số bất kì từ bàn phím rồi giá trị trung bình của dãy số đó in kết quả ra màn hình.

Loga Sinh Học lớp 12

0 lượt thích 31 xem

1 trả lời

Thích Trả lời

teodtr

B1:

program B1;

uses crt;

var A:array [1..500] of integer;

n,i,T: integer;

Begin

clrscr;

write('Nhap n: '); readln(n);

for i:=1 to n do

if i mod 2=0 then T:=T+i;

write('Tong cac so chan = ',T);

readln

End.

B2:

program B2;

uses crt;

var A:array [1..500] of integer;

n,i,T: integer;

Begin

clrscr;

write('Nhap do dai mang: '); readln(n);

for i:=1 to n do

begin

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

if A[i] mod 2=0 then T:=T+A[i];

end;

write('Tong cac so chan = ',T);

readln

End.

B3:

program B3;

uses crt;

var A:array [1..500] of integer;

n,i,T: integer;

Begin

clrscr;

write('Nhap do dai mang: '); readln(n);

for i:=1 to n do

begin

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

T:=T+A[i];

end;

write('Gia tri trung binh cua day = ',T/n:2:1);

readln

End.

Vote (0) Phản hồi (0) 2 năm trước

luuly2209

Câu 1:
program tinh_tong;
uses crt;
var n,i,s:integer;
begin
clrscr;
write('Nhap so luong phan tu: '); readln(n);
for i:=1 to n do if i mod 2=0 then s:=s+i;
write('Tong: ',s);
readln;
end.
Câu 2:
program tinh_tong;
uses crt;
var a:array[1..100] of integer;
n,i,s:integer;
begin
clrscr;
write('Nhap so luong phan tu: '); 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=0 then s:=s+a[i];
write('Tong cac so chan: ',s);
readln;
end.
Câu 3:
program tinh_tbc;
uses crt;
var a:array[1..100] of integer;
n,i,s:integer;
begin
clrscr;
write('Nhap so luong phan tu: '); readln(n);
for i:=1 to n do
begin
write('a[',i,']: '); readln(a[i]);
end;
for i:=1 to n do s:=s+a[i];
write('Trung binh cong: ',s/n:0:2);
readln;
end.

Vote (0) Phản hồi (0) 2 năm trước

Các câu hỏi liên quan

Fill in the blank with the correct form of the word given: Right after the (complete) …………… of the new aircraft, the space shuttle will be replaced. * 1 điểm A. completing B. completion C. completement D. completive Choose the sentence that has the same meaning as the first one: I haven’t seen the alien yet. * 1 điểm A. I have ever seen the alien before. B. I have never seen the alien. C. I have already seen the alien. D. I haven’t been seen the alien. Find the word which has a different sound in the part underlined: * 1 điểm A. mood B. moon C. good D. soon Choose the best answer: I believe that our new manager has the ............ to work well in this business environment. * 1 điểm A. inflexible B. flexibly C. flexibility D. flexible Choose the sentence that has the same meaning as the first one: After she had explained everything clearly, we started our work. * 1 điểm A. We started our work after she has explained everything clearly. B. We started our work after she had explain everything clearly. C. Before we started our work, she had explained everything clearly. D. Before she explained everything clearly, we had started our work. Find the word which has a different sound in the part underlined: * 1 điểm A. deaf B. leaf C. meat D. heat Choose the sentence that has the same meaning as the first one: If the cable TV doesn’t work, we will rent a DVD. * 1 điểm A. We will rent a DVD unless the cable TV doesn’t work. B. We will rent a DVD unless the cable TV works. C. Unless the cable TV not work, we will rent a DVD. D. Unless the cable TV works, we will rent a DVD. Choose the best answer: I think this boy knows how ........ a computer properly. * 1 điểm A. to connect B. connecting C. connected D. connect Choose the best answer: We are learing new words ............. impvove English. * 1 điểm A. order to B. so to as C. so that D. in order to Fill in the blank with the correct form of the word given: There are 45 (attend) ........... today. * 1 điểm A. attenders B. attentions C. attendances D. attendors Find the word which has a different sound in the part underlined: * 1 điểm A. exhaust B. hour C. honest D. house Find the word which has a different sound in the part underlined: * 1 điểm A. other B. leather C. wealthy D. brother Tùy chọn 5 Choose the best answer: If you behave yourself well, your parents will seem ………….. very happy. * 1 điểm be to be are were Choose the best answer: The train ................ at the station yet. 1 điểm A. didn’t arrive B. hasn’t arrived C. isn’t arriving doesn’t arrive Choose the best answer: American rarely shake hands to say goodbye, except ........... business occasions. * 1 điểm A. during B. at C. on D. in Fill in the blank with the correct form of the word given: Body language can be very (effect) ……….… in conveying our messages. 1 điểm A. effective B.effected C. affected D. affective Find the word which has a different sound in the part underlined: * 1 điểm A. allow B. follow C. yellow D. fellow Fill in the blank with the correct form of the word given: You should ask someone’s (permit) …………… before posting anything about them on the web. * 1 điểm A. permition B. permision C. permission D. permitment Choose the best answer: My father shouted at me, ……………. made me feel sorrow. * 1 điểm A. that B. who C. whose D. which Choose the best answer: Would you mind ............... me a cup of tea? * 1 điểm A. make B. making C. to make D. made các bạn giúp mk vs !!!!!!

trong một mặt phẳng tọa độ Oxy Cho hàm số y bằng x² có đồ thị (P) a) Vex đồ thị (P) b) tìm tọa độ các giao điểm của (P) với đường thẳng d:y=-2x+3

tây sơn đánh quân thanh như thế nào

Tình thần yêu nước cho đến hết (trong bài bài tinh thần yêu nước của nhân dân ta) nêu phương thức chính của đoạn văn là gì ?

Mìn đang cần gấp ạ! Mong giúp mìn với! Mìn cảm ơn và ai trl đúng vote 5 sao nhé

...................................

Viết đoạn văn biện pháp phòng chóng COvid 19

ai muốn thử trí tuệ ko ĐỀ THI THỬ HỌC KÌ 2 (ĐỀ SỐ 2) MÔN: TOÁN 6 THỜI GIAN: 90 PHÚT Bài 1(2,5đ) Thực hiện phép tính (Hợp lý nếu có thể) Bài 2( 2,5đ) Tìm x, biết: Bài 3(2đ) Một người mang ra chợ bán 120 quả trứng, có ba người mua hết chỗ trứng. Người thứ nhất mua tổng số trứng, người thứ hai mua số trứng còn lại. a. Hỏi người thứ ba mua bao nhiêu quả trứng? b. Số trứng bán cho người thứ hai bằng bao nhiêu phần trăm tổng số trứng? Bài 4(2,5đ) Trên cùng một nửa bờ chứa tia Ox, vẽ hai tia Om, On sao cho a. Tính số đo góc mOn. b. Chứng tỏ rằng: Tia On là tia phân giác của góc xOm. c. Vẽ tia Oy là tia đối của tia Ox. Tính số đo góc yOn. d. Trên cùng một nửa mặt phẳng bờ chứa tia Ox không chứa tia Om, vẽ tia Oz sao cho . Chứng tỏ góc zOn là góc vuông. Bài 5(0,5đ) Chứng tỏ rằng:

Một bể cá dạng hình hộp chữ nhật làm bằng kính có chiều dài 1,2m, chiều rộng 0,4m, chiều cao 0,6m. Mực nước ban đầu trong bể cao 35cm. Người ta cho vào bể 1 hòn đá thì mực nước trong bể cao 47cm. Tính thể tích hòn đá.

Giải giúp mk vs ạ hứa cho điểm +5* + cảm ơn + ctlhn :3 :) >3<

Loga.vn - Cộng Đồng Luyện Thi Trực Tuyến