Đề tin cuối kì c1: viết chương trình tổng các số tự nhiên đầu tiên sao cho tổng đó nhỏ nhất và lớn hơn 100 c2: viết chương trình tính tổng các lập phương n số tự nhiên đầu với n nhập từ bàn phím c3: viết CT nhập từ bàn phím số nguyên dương n và dãy a gồm n số nguyên dương a1,a2,.

taolavivi

2 năm trước

Đề tin cuối kì c1: viết chương trình tổng các số tự nhiên đầu tiên sao cho tổng đó nhỏ nhất và lớn hơn 100 c2: viết chương trình tính tổng các lập phương n số tự nhiên đầu với n nhập từ bàn phím c3: viết CT nhập từ bàn phím số nguyên dương n và dãy a gồm n số nguyên dương a1,a2,...,an sau đó in ra màn hình TB cộng các phần tử chẵn trong dãy a

Loga Sinh Học lớp 12

0 lượt thích 34 xem

1 trả lời

Thích Trả lời

217943876617730

c1)

var

s,d:integer;

begin

s:=0; d:=0;

repeat

d:=d+1;

s:=s+d;

until s>100;

writeln(s);

end.

C2)

var

n,i,s:longint;

begin

readln(n); s:=0;

for i:=1 to n do n do

s:=s+(i*i*i);

writeln(s);

end.

C3)

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

n,i,dem,tb:integer;

begin

clrscr;

write('Nhap so phan tu:'); readln(n);

for i:=1 to n do

begin

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

end;

tb:=0;

dem:=0;

for i:=1 to n do

if a[i] mod 2=0 then

begin

tb:=tb+a[i];

dem:=dem+1;

end;

writeln('Trung binh cong cac phan tu chan la: ',tb/dem:4:2);

readln;

end.

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

Hyominnn

Đây ạ

Câu 1:

var s,d:integer;

begin

s:=0; d:=0;

repeat

d:=d+1;

s:=s+d;

until s>100;

writeln(s);

end.

Câu 2:

var n,i,s:longint;

begin

readln(n); s:=0;

for i:=1 to n do n do

s:=s+(i*i*i);

writeln(s);

end.

Câu 3:

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

n,i,dem,tb:integer;

begin

clrscr;

write('Nhap so phan tu:'); readln(n);

for i:=1 to n do

begin

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

end;

tb:=0;

dem:=0;

for i:=1 to n do

if a[i] mod 2=0 then

begin

tb:=tb+a[i];

dem:=dem+1;

end;

writeln('Trung binh cong cac phan tu chan la: ',tb/dem:4:2);

readln;

end.

+Xin hay nhất và 5* ạ

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

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

She has English( three time a week ) . Đổi sang cấu trúc How Often

lúc 6h, 1 xe đạp đi từ A vs vận tốc 12km/h. Đến 9h, 1 xe máy cũng đi từ A vs vận tốc 36km/h. và đi cùng chiều với xe đạp. Hỏi lúc xe máy bắt đầu đi, hỏi sau bao lâu xe máy đuổi kịp xe đạp????

Đáp án câu này là C hay D vậy ạ ? Gỉai thích nữa nhâ . Tkss

cho tình huống sau: Bố kha bị nhiễm hiv, biết vậy mẹ An đã cấm con trai mình chơi với Kha. Thấy Kha đến hỏi bài con trai, mẹ An đã đuổi Kha về. a) nêu ý kiến của em về việc làm của mẹ An? b) nếu là An trong trường hợp đó, em sẽ làm gì?

đội 1 đọi 2 đội 3 lần lượt làm được 5/28 3/20 7/32 công việc . Hỏi trong ba đọi đọi nào làm nhanh nhất đọi nào làm chậm nhất

hoa bị ốm mẹ hoa lo lắng nên đi gọi thầy cúng về trừ tà ma và cho hoa uống 1 số thuốc lạ hỏi mẹ hoa lm đúng hay sai ?tại sao? liên hệ bản thân?

Công suất được xác định như thế nào? Viết công thức

Giúp mình với ạ hứa vote 5*+tim

Quang Trung có công lao gì với đất nước? Điểm nổi bật trong nghệ thuật quân sự của Quang Trung. Giúp mình với mái mình thì rồi

Giúp mình với ạ hứa vote 5*+tim

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