Viết trương trình nhập vào 4 số bất kì, in ra màng hình trung bình tổng của 4 số dod
2 câu trả lời
Program baitap;
Uses crt;
Var x,y,z,t:real;
Begin
Clrscr;
Write('Nhap lan luot 4 so do:');
Readln(x,y,z,t);
Writeln('Trung binh tong cua 4 so do:', (x+y+z+t)/4:7:3);
Readln
End.
program tinh;
uses crt;
var a, b, c, d : integer;
begin
clrscr;
write('nhap so a :');readln(a);
write('nhap so b :');readln(b);
write('nhap so c :');readln(c);
write('nhap so d :');readln(d);
writeln('tong bon so la :', a+b+c+d);
writeln('trung binh cong bon so la :', (a+b+c+d)/4);
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
