Viết chương trình tính trung bình của n số được nhập từ bàn phím

Lorem ipsum dolor sit amet, consectetur adipiscing elit.Morbi adipiscing gravdio, sit amet suscipit risus ultrices eu.Fusce viverra neque at purus laoreet consequa.Vivamus vulputate posuere nisl quis consequat.

Create an account

Program Trung_Binh_Cong;

uses crt;

var a,b: real;

begin

clrscr;

write('nhap so a ='); readln(a);

write('nhap so b ='); realdn(b);

writeln('Trung binh cong cua 2 so ',a,' va ',b,' = ' , (a+b)/2);

readln;

end.

Top 1 ✅ Viết chương trình tính trung bình của n số thực được nhập từ bàn phím.(2 cách: dùng for, dùng while) nam 2022 được cập nhật mới nhất lúc 2021-12-26 21:39:18 cùng với các chủ đề liên quan khác

Viết chương trình tính trung bình c̠ủa̠ n số thực được nhập từ bàn phím.(2 cách: dùng for， dùng while)

Hỏi:

Viết chương trình tính trung bình c̠ủa̠ n số thực được nhập từ bàn phím.(2 cách: dùng for， dùng while)

Viết chương trình tính trung bình c̠ủa̠ n số thực được nhập từ bàn phím.(2 cách: dùng for， dùng while)

Đáp:

lanngoc:

While .．do

Program BTH;uses crt;var s:real;n，i:longint;a:array[1..100000] of real;begin        clrscr;        write(‘Nhap so luong phan tu cua mang: ‘);readln(n);        s:=0;        i:=1;        while i<=n do        begin                write(‘a[‘，i，’]: ‘); readln(a[i]);                s:=s+a[i];                i:=i+1;        end;        writeln(‘Trung binh cong la: ‘，s/n:4:2);        readln;

end.

For..do

Program BTH;uses crt;var s:real;n，i:longint;a:array[1..100000] of real;begin        clrscr;        write(‘Nhap so luong phan tu cua mang: ‘); readln(n);        s:=0;        for i:=1 to n do        begin                write(‘a[‘，i，’]: ‘); readln(a[i]);                s:=s+a[i];        end;        writeln(‘Trung binh cong la: ‘，s/n:4:2);        readln;

end.

lanngoc:

While .．do

Program BTH;uses crt;var s:real;n，i:longint;a:array[1..100000] of real;begin        clrscr;        write(‘Nhap so luong phan tu cua mang: ‘);readln(n);        s:=0;        i:=1;        while i<=n do        begin                write(‘a[‘，i，’]: ‘); readln(a[i]);                s:=s+a[i];                i:=i+1;        end;        writeln(‘Trung binh cong la: ‘，s/n:4:2);        readln;

end.

For..do

Program BTH;uses crt;var s:real;n，i:longint;a:array[1..100000] of real;begin        clrscr;        write(‘Nhap so luong phan tu cua mang: ‘); readln(n);        s:=0;        for i:=1 to n do        begin                write(‘a[‘，i，’]: ‘); readln(a[i]);                s:=s+a[i];        end;        writeln(‘Trung binh cong la: ‘，s/n:4:2);        readln;

end.

lanngoc:

While .．do

Program BTH;uses crt;var s:real;n，i:longint;a:array[1..100000] of real;begin        clrscr;        write(‘Nhap so luong phan tu cua mang: ‘);readln(n);        s:=0;        i:=1;        while i<=n do        begin                write(‘a[‘，i，’]: ‘); readln(a[i]);                s:=s+a[i];                i:=i+1;        end;        writeln(‘Trung binh cong la: ‘，s/n:4:2);        readln;

end.

For..do

Program BTH;uses crt;var s:real;n，i:longint;a:array[1..100000] of real;begin        clrscr;        write(‘Nhap so luong phan tu cua mang: ‘); readln(n);        s:=0;        for i:=1 to n do        begin                write(‘a[‘，i，’]: ‘); readln(a[i]);                s:=s+a[i];        end;        writeln(‘Trung binh cong la: ‘，s/n:4:2);        readln;

end.

Viết chương trình tính trung bình c̠ủa̠ n số thực được nhập từ bàn phím.(2 cách: dùng for， dùng while)

Xem thêm : ...

Vừa rồi, seonhé.vn đã gửi tới các bạn chi tiết về chủ đề Viết chương trình tính trung bình của n số thực được nhập từ bàn phím.(2 cách: dùng for, dùng while) nam 2022 ❤️️, hi vọng với thông tin hữu ích mà bài viết "Viết chương trình tính trung bình của n số thực được nhập từ bàn phím.(2 cách: dùng for, dùng while) nam 2022" mang lại sẽ giúp các bạn trẻ quan tâm hơn về Viết chương trình tính trung bình của n số thực được nhập từ bàn phím.(2 cách: dùng for, dùng while) nam 2022 [ ❤️️❤️️ ] hiện nay. Hãy cùng seonhé.vn phát triển thêm nhiều bài viết hay về Viết chương trình tính trung bình của n số thực được nhập từ bàn phím.(2 cách: dùng for, dùng while) nam 2022 bạn nhé.

2: Viết chương trình sử dụng lệnh lặp để tính trung bình cộng của N số thực. Với số N và các số tính trung bình cộng được nhập vào từ bàn phím. Câu 3: Viết chương trình nhận biết một số tự nhiên N được nhập từ bàn phím có phải là số nguyên tố hay không.

• lý thuyết
• trắc nghiệm
• hỏi đáp
• bài tập sgk

Viết chương trình tính trung bình cộng n số thực nhập từ bàn phím

Các câu hỏi tương tự

sử dụng while...do:

program oken;uses crt;var sum:real;    n,i:longint;    a: array[1..1000] of real;begin        clrscr;        write('nhap so so phan tu cua mang: '); readln(n);        sum:=0; i:=1;        while i<=n do                begin                        write('a[',i,']: '); readln(a[i]);                        sum:=sum+a[i];                        i:=i+1;                end;        writeln('TBC=',sum/n:0:3);        readln;

end.

Sử dụng For...to...do:

program oken;uses crt;var sum:real;    n,i:longint;    a: array[1..1000] of real;begin        clrscr;        write('nhap so so phan tu cua mang: '); readln(n);        sum:=0;        for i:=1 to n do                begin                        write('a[',i,']: '); readln(a[i]);                        sum:=sum+a[i];                end;        writeln('TBC=',sum/n:0:3);        readln;

end.