viết chương trình nhập vào dãy n số nguyên, xuất dãy số vừa nhập ra màn hình.tìm min, max, tổng, trung bình cộng của các giá trị của dãy số đó

nguyetskyc5

2 năm trước

Loga Sinh Học lớp 12

0 lượt thích 36 xem

1 trả lời

Thích Trả lời

gooner1531998

uses crt;

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

i,n,min,max,t: integer;

tbc: real;

begin

clrscr;

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

for i:=1 to n do

begin

write ('nhap a[',i,']: '); readln (a[i]);

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

s:=s+a[i];

end;

min:=a[1];

for i:=2 to n do

if min>a[i] then min:=a[i];

tbc:=s/n;

writeln ('tong la: ',s):

writeln ('trung binh cong: ',tbc:1:2):

writeln ('GTLN (max): ',max):

writeln ('GTNN (min): ',min);

readln;

end.

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

ctvukhoi111

uses crt;
var a:array[1..1000] of integer;
i,n,min,max,t:integer;
tbc:real;
begin
clrscr;
write('Nhap n= ');readln(n);
writeln('Nhap day so: ');
for i:=1 to n do
begin
write('a[',i,']= ');readln(a[i]);
end;
min:=a[1];max:=a[1];t:=a[1];
for i:=2 to n do
begin
if a[i]>max then max:=a[i];
if a[i]<min then min:=a[i];
t:=t+a[i];
end;
tbc:=t/n;
writeln('So nho nhat: ',min);
writeln('So lon nhat: ',max);
writeln('Tong: ',t);
writeln('Trung binh cong: ',tbc:0:3);
readln;
end.

`X``i``n` `Ctlhn` `:D`

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

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

đọc đoạn văn trong hình và cho biết: + Thành phần chuyển đoạn + luận điểm chính + luận cứ

Đặc điểm của dong tranh dân gian Đông hồ và hàng trống

câu 1 - 5km 27 m =....m 8m14cm=....cm 2m vuông 12 cm vuông = ...cm vuông 4 phút 4 giây = ... giây 97,5 m vuông = ..... dm vuông 3070 kg = ..... tấn .... kg 5kg 68 g = .....g 7km vuông 5 hm vuông = .... dam vuông 3 thế kỉ 9 năm = .... năm 56 giờ = ... ngày .... giờ 360 phút = ..... giờ .....phút

Mình đang cần gấp bạn nào làm nhanh mình cho 5 sao và lời giải hay nhất.Cảm ơn❤️

Tín ngưỡng cổ truyền của dân tộc ta là gì

Đặt 3 câu cảm: 3 câu có trạng ngữ nơi chốn 3 câu chỉ thời gian Giúp với

Giúp mik giải phương trình vs ạ

Cho góc XKI là góc bẹt Vẽ góc vuông xki là góc vuông Vẽ tia K ở nửa mặt phẳng bờ I có tia KI sao cho góc XKA=50° a, Tính góc AKT b, Tính góc IK c, vẽ kB là tia phân giác của góc IKT Tính góc AKB

giải thích vai trò của lớp chim trong việc tiêu diệt sâu bọ ?

VI. Writing 40. Do morning exercise regularly and you will be fit and healthy . --> If you ...................................................................................................... 41. Rearrange the words to make a meaningful sentence arrive / the / you / at / what time /stadium / did / ? / ....................................................................................................... 42. Write 1 sentence about the thing you couldn"t do when you were five years old and 1 sentence about the thing you could do when you were in primary school . ............................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................................... mog ai đó giúp mik bài này hứa cho ctlhn + cảm ơn + 5 sao chép mạng = báo vi phạm

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