uses crt;

var a:array[1..250]of integer;

i,n,t:integer;

begin

clrscr;

readln(n);

t:=0;

for i:=1 to n do readln(a[i]);

for i:=1 to n do write(a[i]:4);

writeln;

for i:=1 to n do t:=t+a[i];

writeln(t);

readln;

end.

1. Khai báo 2 biến: a và b (trong đó: a là chiều dài, b là chiều rộng)
Cho người dùng nhập giá trị vào 2 biến trên

Công thức chu vi:(a+b)*2
Công thức diện tích: a*b

Điều kiện bổ sung:
+ Nếu a <= 0 hoặc b <=0 hoặc cả a,b <=0 => Báo lỗi (Chiều dài không bao giờ âm)!
+ Nếu a=b => Báo lỗi (Hình chữ nhật thì chiều dài không thể bằng chiều rộng)

de 3

program bt;

uses CRT;
var m,n:integer;
T:real;
BEGIN clrscr;
write('m,n ='); readln(m,n);
writeln('Tong la:',m+n);
writeln('Hieu la:',m-n);
writeln('Tich la:',m*n);
T:=m/n;
writeln('Thuong la:',T);
readln
END.

de 2

a. Hướng dẫn:

- Nhập hai cạnh vào hai biến a, b.

- Chu vi hình chữ nhật bằng 2*(a+b); Diện tích hình chữ nhật bằng a*b.

b. Mã chương trình:

Program Chu_nhat;

uses crt;

Var a, b, S, CV: real;

Begin

Write('Nhap chieu dai:'); readln(a);

Write('Nhap chieu rong:'); readln(b);

S := a*b;

CV := (a+b)*2;

Writeln('Dien tich hinh chu nhat la:',S);

Writeln('Chu vi hinh chu nhat la:',CV:10:2);

readln

end.

Cuộc sống này thật đa dạng muôn màu, muôn vẻ với bao bất ngờ và cũng có lúc thật bay bổng như một câu chuyện cổ thần tiên. Và văn chương đã góp một phần không nhỏ vào cái thế giới phong phú, nhiều màu sắc này. Vì vậy mà “Văn chương gây cho ta những tình cảm ta không có, luyện những tình cảm ta sẵn có”. 
Đối với mỗi người văn chương có những ý nghĩa, cảm nhận khác nhau. Nhưng ai cũng hiểu rằng văn chương là một thứ trừu tượng, ta không thể nhìn thấy hay chạm vào nó mà chỉ có thể lắng nghe và cảm nhận thôi. Văn chương là nơi kết tụ cái tinh hoa của cuộc sống. Văn chương còn có một ý nghĩa vô cùng quan trọng với đời sống con người. “Văn chương gây cho ta những tình cảm ta không có, luyện những tình cảm ta sẵn có” chính là công dụng của văn chương, Nghĩa là văn chương mở ra cho ta những “chân trời mới”, bồi đắp tình cảm tốt đẹp cho ta, làm giàu thêm cho thế giới tâm hồn ta. Và văn chương khai phá những tình cảm xưa nay ẩn sâu trong trái tim ta và bồi dưỡng những thứ tình cảm ấy thêm lớn hơn nữa. 
Vì sao trong tác phẩm “Ý nghĩa văn chương”, nhà văn Hoài Thanh lại nói “Văn chương luyện những tình cảm ta sẵn có”. Vì văn chương dạy, giúp ta hiểu thêm được ý nghĩa, giá trị của tình cảm gia đình là to lớn, là quan trọng thế nào. Giúp cho mỗi lứa học sinh chúng ta thấm thía hơn công lao dưỡng dục của cha mẹ; sự vất vả, những giọt mồ hôi phải rơi xuống của cha mẹ để nuôi chúng ta lớn lên từng ngày. Qua câu ca dao ông cha ta nói ngày xưa: “ Công cha như núi Thái Sơn / Nghĩa mẹ như nước trong nguồn chảy ra”, ta đã thấy được tình cảm của cha mẹ dành cho chúng ta là vô bến bờ, cha mẹ luôn luôn yêu thương ta, che chở ta mãi mãi. 
Và qua những dòng văn thơ, văn chương cũng cho chúng ta biết ông bà, những người tuy không sinh ra chúng ta nhưng ông bà đã cùng bố mẹ nuôi nấng, chăm sóc chúng ta nên người. Và nhờ ông bà thì mới có bố mẹ, để rồi có chúng ta ngày hôm nay. Từ đó mà ta nhận ra một điều rằng càng phải biết ơn, kính yêu ông bà hơn nữa. Và cũng từ câu ca dao xưa đã giúp ta hiểu được đạo lí ấy: “Ngó lên nuộc lạt mái nhà / Bao nhiêu nuộc lát nhớ ông bà bấy nhiêu”.
Ông cha ta còn có câu: “ Anh em như thể tay chân / Rách lành đùm bọc dở hay đỡ đần”, để từ đó mà ta biết được, hiểu rõ sự quí giá của tình anh em ruột thịt. Để từ đó ta biết được rằng anh em luôn sát cánh bên chúng ta, luôn bên ta những lúc khó khăn và cả những giây phút hạnh phúc. Hiểu giá trị tình anh em để ta hiểu được ta phải làm j` để cho tình anh em ruột thịt thêm khăng khít, bền chặt. 
Văn chương cho ta biết giá trị tình cảm gia đình, và văn chương còn cho ta biết ý nghĩa của tình bạn bè, bằng hữu. Văn chương ngày nay đã có bao nhiêu những tác phẩm nói lên tình bạn thực sự, đẹp đẽ, tri kỉ. Dưới ngòi bút tinh tế của nhà thơ Nguyễn Khuyến trong văn bản “Bạn đến chơi nhà”, tình bạn đã hiện lên thật giản dị mà cũng thật cao thượng. Tình bạn là 1 thứ tất yếu, tình bạn không cần của cải vật chất. Bạn bè luôn hiểu ta nhất, luôn bên ta, biết ta cần gì,…Qua bài thơ “Bạn đến chơi nhà” mà ta thêm trân trọng tình cảm bạn bè dành cho nhau, một thứ tình cảm tồn tại mãi mãi… 
Văn chương giúp ta thấm thía được tình cảm gia đình, thêm trân trọng tình bạn thiêng liêng và giờ văn chương đẩy mạnh tình yêu nước trong tim mỗi con người. Những lời văn sinh động, chất chứa đầy tình cảm thúc đẩy niểm tự hào của ta về quê hương đất nước: vẻ đẹp tiềm ẩn, cảnh sắc quê hương, truyền thống văn hóa đặc sắc, một lịch sử dựng nước và giữ nước hào hùng,… Qua những lời văn miêu tả tinh tế, chân thật trong văn bản “Sài Gòn tôi yêu” hay Mùa xuân của tôi”,… ai mà chẳng tự hào, ngượng mộ vẻ đẹp tự nhiên tiềm ẩn của quê hương Việt Nam ta. Còn qua hai tác phẩm “ Một thứ quà của lúa non: Cốm” và “ Ca Huế trên sông Hương”, một lần nữa ta lại thêm tự hào về nền văn hóa đặc sắc lâu đời của dân tộc ta. Đến khi đọc những tác phẩm “Lòng yêu nước của nhân ta”, “Nam quốc sơn hà”,… ta lại phải khâm phục sức kiên cường, không lùi bước chiến đấu của dân tộc ta, để lại một trang sử hào hùng. 
“Văn chương gây cho ta những tình cảm ta không có”. Đó là tác dụng tiếp theo của văn chương đem lại. “ Văn chương là bức tranh muôn màu của cuộc sống giúp cho ta hiểu thêm những sắc màu khác nhau của cuộc đời mà ta chưa từng trải qua”. Chắc bạn hẳn bạn còn nhớ văn bản “Tụng giá hoàn kinh sư” do Trần Quang Khải viết sau chiến thắng Chương Dương, Hàm Tử và giải phóng kinh đô năm 1285. “Tụng giá hoàn kinh sư” như một khúc khải hoàn ca đầu tiên trong lịch sử chống ngoại xâm và trong lịch sử văn học Việt Nam. những dòng thơ chân thật, thúc đẩy tinh thần bảo vệ đất nước, chống giặc ngoại xâm trong mỗi người, gợi cho ta một hào khí chiến đấu oai hùng của cha ông.

uses crt;

var a:array[1..100]of integer;

i,n,t:integer;

begin

clrscr;

write('n='); readln(n);

if (n>0) and (n<=100) then

begin

t:=0;

for i:=1 to n do

begin

write('a[',i,']='); readln(a[i]);

if (a[i] mod 2=0) or (a[i] mod 2=1) then t:=t+a[i];

end;

writeln('tong cac phan tu chan hoac le trong day la: ',t);

end

else writeln('vui long nhap lai');

readln;

end.

1.Chương trình bảng tính là phần mềm được thiết kế để giúp ghi lại và trình bày thông tin dưới dạng bảng, thực hiện các tính toán cũng như xây dựng các biểu đồ biểu diễn một cách trực quan các số liệu trong bảng.

2.Microsoft Office