Program Trungbinhcong;
Uses crt;
Var a,b,c,d,tb: integer;
Begin
Clrscr;
Write('Nhap so thu nhat:'); Readln(a);
Write('Nhap so thu hai:'); Readln(b);
Write('Nhap so thu ba:'); Readln(c);
Write('Nhap so thu tu:'); Readln(d);
tb:=(a+b+c+d)/4;
Writeln('Trung binh cong cua 4 so la:',tb:4:2);
Readln
End.
Viết chương trình nhập vào 1 mảng số nguyên. In ra màn hình giá trị trung bình của mảng đó và các phân tử lớn hơn giá trị trung bình của mảng đó.
Viết chương trình nhập biến mảng M gồm 100 phần tử thuộc kiểu số nguyên +nhập các phần tử và in ra màn hình + tìm và in ra màn hình giá trị lớn nhất trong dãy số vừa nhập +tìm và in ra màn hình giá trị nhỏ nhất trong dãy số vừa nhập
a, Viết chương trình pascal nhập vào một dãy số nguyên n từ bàn phím b, in dãy vừa nhập ra màn hình. c, đếm xem bao nhiêu số dương. d, in kết quả số dương ra màn hình.
Em hãy viết chương trình nhập vào mảng số nguyên gồm n phần tử, sau đó in ra màn hình các giá trị phần tử là số chẵn trong mảng.
Cho hai biến a,b, có kiểu dữ liệu số nguyên. Em hãy viết chương trình Pascal thực hiện các yêu cầu sau: a) Khai báo hai biến a,b. b) Nhập giá trị của hai biến a,b từ bàn phím. c) In kết quả tổng của a,b ra màn hình.
1. Viết chương trình nhập vào một số nguyên dương n và in ra màn hình dãy số tự nhiên từ 1 tới n. 2. Viết chương trình nhập vào một số nguyên n và in ra màn hình các số nguyên chẵn trong khoảng từ 1 tới n.
Viết chương trình nhập từ bàn phím hai số nguyên a và b. Thực hiện tính và in ra màn hình tổng và hiệu hai số đó
2.viết chương trình nhập vào số nguyên dương n. A. Tìm và in ra màn hình các số từ 1 đến n chia hết cho 2. .B. tìm và in ra màn hình số từ 1-n ko chia hết cho 2
Cho hai biến a,b, có kiểu dữ liệu số nguyên.
Em hãy viết chương trình Pascal thực hiện các yêu cầu sau:
a) Khai báo hai biến a,b.
b) Nhập giá trị của hai biến a,b từ bàn phím.
c) In kết quả tổng của a,b ra màn hình.
