viết chương trình pascal tính giá trị trung bình cộng của biến số a,b,c ,d và e nhập vào từ bàn phím với điều kiện chỉ sử dụng 2 biến Giúp mình với 😭

2 câu trả lời

uses crt;
var s,x:longint;
begin
clrscr;
   write('Nhap a: ');readln(x);
   s:=s+x;
   write('Nhap b: ');readln(x);
   s:=s+x;
   write('Nhap c: ');readln(x);
   s:=s+x;
   write('Nhap d: ');readln(x);
   s:=s+x;
   write('Nhap e: ');readln(x);
   s:=s+x;
   writeln('Trung binh cong: ',s/5:0:2);
readln
end.

Program tbc; Uses crt; Var a,b,c,s:integer; Begin Clrscr; Write('nhap so a:'); readln(a); Write('nhap so b:'); readln(b); Write('nhap so c:'); readln(c); S:=(a+b+c)/3 Write('trung binh cong ba so la',s); Readln; End.