Viết một chương trình thực tế có sử dụng biến mảng Giúp mình với mình cần gấp Lưu ý : không phải mấy loại chương trình như nhập điểm đâu

crystaleye005

2 năm trước

Loga Sinh Học lớp 12

0 lượt thích 27 xem

1 trả lời

Thích Trả lời

hien57035

program BT_mang;

uses crt;

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

n,i,TB,thunhapTB: integer;

Begin

clrscr;

write('Nhap so ho gia dinh: '); readln(n);

for i:=1 to n do

begin

write('Ho ',i,' (d): '); readln(A[i]);

thunhapTB:=thunhapTB+A[i];

end;

writeln('Thu nhap trung binh cua cac ho: ',thunhapTB/n:2:0,'d');

writeln('Nhap muc thu nhap trung binh: '); readln(TB);

for i:=1 to n do writeln('Ho ',i,' lech voi muc TB: ',A[i]-TB,'d');

readln

End.

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

hoangbap2852002

Mình cho chương trình về tìm số lớn nhất và nhỏ nhất nha

program min_max;

uses crt;

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

n,i,min,max:integer;

begin

clrscr;

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

for i:=1 to n do

begin

write('Nhap so thu ',i,': '); readln(A[i]);

end;

min:=A[1]; max:=A[1];

for i:=2 to n do

begin

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

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

end;

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

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

readln;

end.

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

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

Cho x,y là các sô thực thỏa mãn $x^{2}$+ $y^{2}$ =1. Tìm giá trị nhỏ nhất của biểu thức A=(x-5)(y-5)

4⟩Dãy từ nào sau đây là những từ có nhiều nghĩa ? A.Rau cải,cá chép,nhà cửa,bàn ghế B.Cà Mau,Nguyễn Văn Trỗi, Quảng Trị C.Pháp luật,Đạo đức ,Chính Trị. Đ.Đi,Ăn ,Chân,Mũi,Đầu 5⟩Tìm nghĩa của các từ nhiều nghĩa trong dãy từ ở bài trên .GIÚP TUII ZỚI NHA.Pls!!!

vẽ tui anime nữ bùn nha NL:e lm ~ thái độ sai bảo ah như z chỉ qua là e muốn ah ghét e thôi.Tại e thấy e đã gây nhiều phiền phức cho ah.E xl ah nhiều lắm. @vphanba1

Tính M đường cần để hòa tan trong 250l nước ở 20 độ C để tạo thành dung dịch bão hòa. Biết ở 20 độ C độ tan của đường là 200g.

hòa tan hết 7,74 hỗn hợp kim loại magie,nhôm bằng 500ml dung dịch chứa 2 loại axit hcl 1m và h2so4 0,28m thu được dung dich a và 8,736 lít khí hidro đo ở dktc a, tính kl muối khan thu được b,cho dd a phản ứng với v lít dung dịch nạoh 2m.tính dd naoh cần dùng để thu được kết tủa lớn nhất.tính kl kết tủa đó

cho các từ sau: Biết ơn, lòng biết ơn, ý nghĩa, vật chất, giải lao, hỏi, câu hỏi, điều, trao tặng, sự trao tặng, ngây ngô, nhỏ nhoi, băn khoăn Tìm DT, ĐT, TT trong các câu trên.

Vẽ anime NL: nhận xét trank quẹt bừa lúc học lý

Cho 1 chiếc vòng nhẫn có khối lượng 200g Được nhúng vào nước xà phòng có hệ số căng bề mặt là 25.10 ^ trừ3 N/m Tính lực F cần thiết để bứt vòng ra khỏi nước xà phòng biết đường kính ngoài và đường kính trong của nó là 20mm và 1,5mm

Cho hình bình hành ABCD . Trên AB lấy E sao cho AE =2EB . Đoạn AC và DE cắt nhau tại O . Biết diện tích BCE = 18cm2 . Tìm diện tích AOD . Tui cần gấp nha !!!! >.<

giúp mình bài 3 vs bài 4 được không ? mình sẽ cho 5* và ctlhn

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