Lập Trình Pascal: In Ra Phần Tử Nhỏ Nhất, Lớn Nhất Trong Dãy Số Nhập ...

Trang chủ » Tìm Số Lớn Nhất Và Nhỏ Nhất Trong Mảng Pascal » Lập Trình Pascal: In Ra Phần Tử Nhỏ Nhất, Lớn Nhất Trong Dãy Số Nhập ...

Có thể bạn quan tâm

Bài Kiểm Tra © 2020 Bài Kiểm Tra.com. All Rights Reserved. logo 1
  • Trang nhất
  • Tin học
Thứ năm, 18/12/2025, 01:57 Lập trình Pascal: In ra phần tử nhỏ nhất, lớn nhất trong dãy số nhập vào 2019-12-29T22:12:01+07:00 Hướng dẫn lập trình Pascal: Viết chương trình nhập vào một dãy số nguyên có n phần tử. In ra màn hình phần tử nhỏ nhất, phần tử lớn nhất và giá trị trung bình của danh sách ra màn hình. phần tử nhỏ nhất, phần tử lớn nhất, giá trị trung bình, chương trình nhập vào một dãy số nguyên https://baikiemtra.com/uploads/news/2019_11/bai-tap-lap-trinh-pascal.jpg Bài Kiểm Tra Chủ nhật - 29/12/2019 22:10
  • In ra
Hướng dẫn lập trình Pascal: Viết chương trình nhập vào một dãy số nguyên có n phần tử. In ra màn hình phần tử nhỏ nhất, phần tử lớn nhất và giá trị trung bình của danh sách ra màn hình.

Program MAX_MIN_AVG; Uses crt; Var a:array[1..20] of integer; i,n,max,min,sum:integer; Begin Clrscr; Writeln('TIM MAX, MIN, AVERAGE CUA MOT DAY SO'); Writeln('---------------------------'); Write('Nhap so phan tu cua day n='); readln(n); For i:=1 to n do Begin Write('Nhap a[',i,']=');readln(a[i]); End; Min:=a[1]; Max:=a[1]; Sum:=0; For i:=1 to n do Begin If (Min > a[i]) then Min:=a[i]; If (Max < a[i]) then Max:=a[i]; Sum :=sum+a[i]; End; Writeln('Day so vua nhap la: '); Writeln('-------------------------'); For i:=1 to n do Write(a[i]:4); Writeln; Writeln('Gia tri lon nhat la:',Max); Writeln('gia tri nho nhat la:',Min); Writeln('gia tri trung binh la:',Sum/n:6:2); Readln; End.

Tags: Lập trình Pascal

Ý kiến bạn đọc

Sắp xếp theo bình luận mới Sắp xếp theo bình luận cũ Sắp xếp theo số lượt thích
  • ẻwa qhello ẻwa 17/09/2023 07:27
    • Trả lời
    • Thích 0
    • Không thích 0

Theo dòng sự kiện

    /assets/news/2024_09/image-20240919121618-1.png Soạn Ngữ văn lớp 11 sách Chân trời sáng tạo, bài 1: Cõi lá

    /assets/news/2024_09/image-20240919121156-1.png Soạn Ngữ văn lớp 11 sách Chân trời sáng tạo, bài 1: Ai đã đặt tên cho dòng sông

Xem tiếp...

Những tin cũ hơn

    /assets/news/2019_11/bai-tap-lap-trinh-pascal.jpg Lập trình Pascal: Tìm số đảo của một số nguyên dương

    /assets/news/2019_11/bai-tap-lap-trinh-pascal.jpg Lập trình Pascal: Tính các số Fibonacci

GIẢI BÀI TẬP
Lớp 1 Lớp 2 Lớp 3 Lớp 4 Lớp 5
Lớp 6 Lớp 7 Lớp 8 Lớp 9
Lớp 10 Lớp 11 Lớp 12
Bài học Bài soạn Bài giảng
Bài giới thiệu Bài hướng dẫn
Bài làm văn Bài trắc nghiệm
Kiểm tra 15P Kiểm tra 1 tiết
Kiểm tra HK1 Kiểm tra HK2
Thi vào lớp 10 Tốt nghiệp THPT
BÀI LUYỆN THI
Lớp 1 Lớp 2 Lớp 3 Lớp 4 Lớp 5
Lớp 6 Lớp 7 Lớp 8 Lớp 9
Lớp 10 Lớp 11 Lớp 12
Kiểm tra 15 phút Kiểm tra 1 tiết
Kiểm tra học kì 1 Kiểm tra học kì 2
Luyện thi theo Bài học
Luyện thi THPT Quốc Gia
THÀNH VIÊN Hãy đăng nhập thành viên để trải nghiệm đầy đủ các tiện ích trên site Nhập mã do ứng dụng xác thực cung cấp Thử cách khác Nhập một trong các mã dự phòng bạn đã nhận được. Thử cách khác Đăng nhập Đăng ký © 2020 Bàikiểmtra.com. All Rights Reserved. Bạn đã không sử dụng Site, Bấm vào đây để duy trì trạng thái đăng nhập. Thời gian chờ: 60 giây

Từ khóa » Tìm Số Lớn Nhất Và Nhỏ Nhất Trong Mảng Pascal