Viết chương trình tính trung bình cộng của bốn số a,b,c,d. Với a,b,c,d được nhập từ bàn phím (Pascal) Giúp mình với! Hic...hic...??
2 câu trả lời
Var T,a,b,c,d:real;
Begin
Writeln('4 so a,b,c,d lan luo la:');
readln(a,b,c,d);
T:=(a+b+c+d)/4;
Writeln('Trung binh cong cua 4 so :',T:8:4);
readln;
End.
Program Trung_binh_cong;
uses crt;
Var T,a,b,c,d:real;
Begin
clrscr;
Writeln('Nhap bon so can tinh trung binh cong:');readln(a,b,c,d);
T:=(a+b+c+d)/4;
Writeln('Trung binh cong la:',T:10;2);
readln;
End.
Câu hỏi trong lớp
Xem thêm
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết giúp các em luyện tập và củng cố kiến thức hiệu quả
- Kiểm tra 15 phút lần 1 học kì 1 - đề số 5 Địa 8 có lời giải chi tiết
- Kiểm tra 15 phút lần 1 học kì 1 - đề số 4 Địa 8 có lời giải chi tiết
