Trang chủ Tin Học Lớp 8 TINH TB.PAS Progran Tinh_Irung_binh; Uses Crt; Var n, den: Integer;...

TINH TB.PAS Progran Tinh_Irung_binh; Uses Crt; Var n, den: Integer; x, tong, th: real; Begin Clrscr; den := 0; tong := 0; Write ('Nhap so cac so can tinh n

Câu hỏi :

giải thích các câu lệnh được sử dụng trong bài sau

image

Lời giải 1 :

Program Tinh_Trung_Binh; →Khai báo tên chương trình là Tinh_Trung_Binh,

Uses crt;→Khai báo thư viện.

Var n,dem:Integer;→Khai báo biến n,dem có kiểu dữ liệu là Integer.

x,tong,tb:real;→Khai báo biến x,tong, tb có kiểu dữ liệu là real.

Begin→Bắt đầu phần thân chương trình.

Clrscr;→Câu lệnh để xóa toàn bộ màn hình máy tính.

dem:=0;→Biến dem được gán giá trị bằng 0.

tong:=0;→Biến tong được gán giá trị bằng 0.

Write('Nhap so cac so can tinh n = '); Readln(n);→In ra màn hình " Nhap so cac so can tinh n = " và sau đó nhập giá trị của n.

While dem<n do→Điều kiện để lặp là dem<n.

Begin→Bắt đầu đoạn chương trình.

dem:=dem+1;→Biến dem tăng 1 giá trị.

Write('Nhap so thu ',dem,' = ');→In ra màn hình " Nhap so thu dem = ".

Readln(x); →Nhập giá trị của x và đưa con trỏ xuống dòng.

tong:=tong+x; →Biến tong được gán giá trị bằng tong cộng với x.

End;→Kết thúc đoạn chương trình.

tb:=tong/n;→Biến tb được gán giá trị bằng tong chia cho n.

Writeln('Trung binh cua ',n,' so vua nhap la; ',tb:10:3);→In ra màn hình câu lệnh Trung  binh cua n so vua nhap la, tb cách vào 10 khoảng cách và làm tròn đến chữ số thập phân thứ 3. Đưa con trỏ xuống dòng.

Writeln('Nhan Enter de thoat!'); →In ra màn hình Nhan Enter de thoat! và đưa con trỏ xuống dòng.

Readln;→Dừng lại cho đến khi bấm phím Enter;

End. →Kết thúc chương trình.

Thảo luận

Bạn có biết?

Tin học, tiếng Anh: informatics, tiếng Pháp: informatique, là một ngành khoa học chuyên nghiên cứu quá trình tự động hóa việc tổ chức, lưu trữ, xử lý và truyền dẫn thông tin của một hệ thống máy tính cụ thể hoặc trừu tượng (ảo). Với cách hiểu hiện nay, tin học bao hàm tất cả các nghiên cứu và kỹ thuật có liên quan đến việc mô phỏng, biến đổi và tái tạo thông tin.

Nguồn : Wikipedia - Bách khoa toàn thư

Tâm sự 8

Lớp 8 - Năm thứ ba ở cấp trung học cơ sở, học tập bắt đầu nặng dần, sang năm lại là năm cuối cấp áp lực lớn dần nhưng các em vẫn phải chú ý sức khỏe nhé!

Nguồn : ADMIN :))

Copyright © 2021 HOCTAP247