Tin học cấu trúc lặp

[Lê Kiều Trang]

[TẶNG BẠN] TRỌN BỘ Bí kíp học tốt 08 môn
Chắc suất Đại học top - Giữ chỗ ngay!!

ĐĂNG BÀI NGAY để cùng trao đổi với các thành viên siêu nhiệt tình & dễ thương trên diễn đàn.

viết chương trình nhập vào 2 số a và b từ phàn phím tính và hiển thị ra màn hình trung bình cộng của các phân tử trong đoạn từ a đến b

 

[Trâm Nguyễn Thị Ngọc]

viết chương trình nhập vào 2 số a và b từ phàn phím tính và hiển thị ra màn hình trung bình cộng của các phân tử trong đoạn từ a đến b

Var
 tbc,i,a,b:integer;
Begin
 readln(a); readln(b);tbc:=0;
 For i:=a to b do
   tbc:=tbc+i;
tbc:=tbc/(b-a+1);
 write('tbc cua cac so tu',a,'den',b,'la:',tbc);
readln
end.