Viết chương trình Pascal a)Viết chương trình thực hiện các nhiệm vụ sau: -Nhập 4 số a,b,c,d từ bàn phím trong đó a,b là số nguyên;c,d là số thực -Tính tổng(s) cho 4 số a,b,c,d và tính trung bình cộng chó 4 số đó -Thông báo kết quả tính tổng và trung bình cộng lên màn hình b)Viết công thức nhập từ bàn phím 3 số dương a,b,c sau đó kiểm tra 3 số đó có phải 3 cạnh của 1 tam giác không.

1 câu trả lời

Program tbc; Uses crt; Var a,b,c: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); S:=(a+b+c+d)/4 Write('trung binh cong ba so la',s); Readln; End.