1.Viết chương trình tìm giá trị lớn nhất của dãy số nhập vào từ bàn phím (sử dụng biến mảng) 2.Viết chương trình tìm giá trị nhỏ nhất của dãy số nhập vào từ bàn phím (sử dụng biến mảng)

Yuki

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

minhcuong1804

$C1$

program C1;

uses crt;

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

n,i,max: integer;

Begin

clrscr;

write('Nhap so phan tu: ');

max:=1;

for i:=1 to n do

begin

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

if max<A[i] then max:=A[i]l

end;

write('Gia tri lon nhat: ',max);

readln

End.

$C2$

program C2;

uses crt;

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

n,i,min: integer;

Begin

clrscr;

write('Nhap so phan tu: ');

min:=1;

for i:=1 to n do

begin

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

if min>A[i] then min:=A[i]l

end;

write('Gia tri nho nhat: ',min);

readln

End.

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

thienthy

1.
program cau1;
uses crt ;
var i,n,Max:integer;
A:array [1..500] of integer;
Begin
writeln('nhap so phan tu ');
readln(n);
For i:=1 to n do
begin
writeln('nhap gia tri thu ',i);readln(A[i]);
end;
Max:=A[1];
for i:=2 to n do
if A[i]> Max then Max:=A[i];
write('gia tri lon nhat la:',A[i]);
readln
end.
1.
program cau2;
uses crt ;
var i,n,Min:integer;
A:array [1..500] of integer;
Begin
writeln('nhap so phan tu ');
readln(n);
For i:=1 to n do
begin
writeln('nhap gia tri thu ',i);readln(A[i]);
end;
Min:=A[1];
for i:=2 to n do
if A[i]< Min then Min:=A[i];
write('gia tri nho nhat la:',A[i]);
readln
end.

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

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

Nước đá và hơi nước thì khoảng cách giữa các phân tử ở trạng thái nào lớn hơn ? A.bằng nhau B.nước đá C hơi nước D không thể so sánh

Hiện nay nước ta đang gặp khó khăn gì ? em cần làm gì để giảm bớt các khó khăn đó ?

Một quả cầu nhôm có khối lượng 150g được đun nóng từ 25 độ đến 100 độ. Thả quả cầu nhôm vào 470gam nước thì nước tăng đến 25 độ . Tính nhiệt độ ban đầu của nước

cảm nhận về 2 bài "Khi con tu hú " và "Nước Đại Việt ta " ko chép mạng

Một ô tô dự định đi từ a đến b với vận tốc 50km/h ,nhưng thực tế lại đi với vận tốc 40km/h nên đã tới trễ hơn dự định 20 phút tính độ dài đoạn đường ab

tính nhanh 1,5 giờ ×12 - 90 phút- 1,5 giờ ai làm đung và nhanh nhất mình vote 5* cho! Cảm ơn

Tại sao ĐNB là vùng thu hút mạnh lao động và vốn đầu tư nước ngoài. Mk cần gấp nha . Cảm ơn 🤗

Tính bằng 2 cách a) (6/11+5/11)×3/7 b,3/5×7/9_3/5×2/9 c,(6/7_4/7):2/5 d,8/15:2/11+7/15:2/11

tam giác ABC vuông tại A, góc C= 45°. Tam giác ABC là tam giác j?

Để thu sinh khối vsv lớn nên nuôi cấy vsv ở môi trường nào ví dụ

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