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.