Quảng cáo
1 câu trả lời 240
2 năm trước
program MaxMinValue;
var n, i, max, min, num: integer;
begin
write('Nhap so phan tu cua day: ');
readln(n);
write('Nhap cac phan tu cua day: ');
readln(num);
max := num;
min := num;
for i := 2 to n do
begin
readln(num);
if num > max then max := num;
if num < min then min := num;
end;
writeln('Gia tri lowns nhat cua day la: ', max);
writeln('Gia tri nho nhat cua day la: ', min);
readln;
end.
Quảng cáo
Bạn muốn hỏi bài tập?
Câu hỏi hot cùng chủ đề
-
Hỏi từ APP VIETJACK44971
-
Hỏi từ APP VIETJACK27113
Gửi báo cáo thành công!
