Best tin giúp mình với Viết chương trình nhập vào một dãy số với độ dài nhập từ bàn phím. Tính tích và tổng, tìm số lớn nhất, số bé nhất của dãy

500645114030578

1 năm trước

Loga Sinh Học lớp 12

0 lượt thích 6 xem

1 trả lời

Thích Trả lời

nguyenkhachuynhjm

program ct;

uses crt;

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

i,n,max,min:integer;

S,T:longint;

begin clrscr;

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

for i:=1 to n do

begin

writeln('Nhap phan tu thu ',i,': '); readln(A[i]);

end;

S:=0; T:=1; max:=A[1]; min:=A[1];

for i:=1 to n do

begin

S:=S+A[i]; T:=T*A[i];

if A[i]>max then max:=A[i];

if A[i]<max then min:=A[i];

end;

writeln('Tong la: ',S);

writeln('Tich la: ',T);

writeln('Gia tri lon nhat la: ',max);

writeln('Gia tri nho nhat la: ',min);

readln;

end.

Học tốt!

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

nnhu86

program ct;

uses crt;

var Max,i,n,Min,s,T:integer;

A:array[1..100] of integer;

begin

clrscr;

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

for i:=1 to n do

begin

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

end;

s:=0;

for i:=1 to n do s:=s+A[i];

writeln('tong la:',s);

T:=1;

for i:=1 to n do T:=T*A[i];

writeln('tich la:',T);

Max:=A[1];Min:=A[1];

for i:=2 to n do

begin

if Max<A[i] then Max:=A[i];

if Min>A[i] then Min:=A[i];

end;

writeln('so lon nhat la:',Max);

writeln('so nho nhat la:',Min);

readln

end.

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

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

cho tam giác abc vuông tại b,đg pg ad (D thuộc BC).kẻ BO vuông góc với ad (O thuộc AD),BO cắt AD tại E.Cm a,Tam giác ABO=tam giác AEO. b,Tam giác ABE là tam giác cân. c,AD là đường trung trực của BE. d,Kẻ BK vuông góc với AC (K thuộc AC) .Gọi mlà giao điểm của BK và Ad.CMR ME song song với BC

Một vật sáng AB cao 1cm dạng mũi tên đặt vuông góc với trục chính của một thấu kính hội tụ điểm A nằm trên trục chính và cách thấu kính một đoạn 60 cm Thấu kính có tiêu cự f = 20 cm a dựng ảnh của vật ab qua thấu kính và nhận xét đặc điểm của ảnh b tính khoảng cách từ ảnh đến thấu kính và chiều cao của ảnh

một bể nước hình chữ nhật có chiều dài 1,6m chiều rộng 1,5m và chiều cao 12dm bể không có nước người ta đổ vào bể 48 thùng nước đầy mỗi thùng đầy chứa 20 lít nước[biết rằng cứ 1dm=1 lít nước].hỏi a/thể tích của bể b/mực nước trong bể còn cách miệng bể bao nhiêu mét c/muốn đầy bể nước th2 phải đổ thêm bao nhiêu thùng nước nữa

có ai giúp mình với mai mik thi r trả lời hết cho mik được không

viết đoạn văn tả cây táo ( khoảng 5 - 8 câu ) { không chép mạng }

Quy ước dòng điện là gì Kể tên các điên dùng

Các bạn ho mình thêm dẫn chứng tiêu biểu về câu tục ngữ "thất bại là mẹ thành công". Mình sắp thi rồi

1) Đọc đoạn thơ sau và trả lời câu hỏi : Con sẽ không đợi một ngày kia Khi mẹ mất mới giật mình khóc lóc Những dòng sông trôi đi có trở lại bao giờ ? Con hoảng hốt trước thời gian khắc nghiệt Chạy điên cuồng qua tuổi mẹ già nua Mỗi ngày qua con lại thấy bơ vơ Ai bíu nổi thời gian ? Ai níu nổi ? Con mỗi ngày một lớn lên Mẹ mỗi ngày một cằn cỗi Cuộc hành trình thầm lặng phía hoàng hôn . a) Đoạn thơ được viết theo thể thơ nào ? Xác định phương thức biểu đạt chính của đoạn thơ ? b) Em hiểu thế nào về câu thơ : Những dòng sông trôi đi cso bao giờ trở lại c) Nêu những biện pháp tu từ sử dụng nhiều nhất trong đoạn thơ ? Tác dụng của nó trong trong việc diễn đạt nội dung ? d) Nêu ngắn gọn nội dung của đoạn thơ trên. 2 ) Tạo lập văn bản : a) Viết đoạn văn trình bày suy nghĩ của em về tính tự giác của người Việt Nam trong đại dịch Covid 19 . b) Cảm nhận của em về bài thơ "Khi con tu hú" của Tố Hữu (dàn ý)

Trong câu lệnh khai báo biến mảng phát biểu đúng như thế nào?

VI. Use the words in capitals to form a word that fits in the space in the same line. Forests One third of (62) ………………………….. Europe is covered by trees. This sounds (63) ………………………….., but most of these trees were planted recently and are no (64) ………………………….. for the ancient natural forests. Europe’s ancient woods are (65) ………………………….. habitats for a large number of (66) ………………………….. species. Fast- growing modern forests, however, are dark and (67) ………………………….. to birds and animals. The Worldwide Fund for Nature recently held a seminar to increase (68) ………………………….. for a new campaign called “Forests for Life”. The (69) ………………………….. wants to introduce bans on trade in (70) ………………………….. made from wood from these forests. By the year 2000 they hope to have built up a network to provide (71) ………………………….. for (72) ………………………….. areas and help restore damaged forests. WEST IMPRESS REPLACE SUIT ENDANGER INVITING PUBLIC ORGANIZE PRODUCE PROTECT EXIST

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