program tongnso;

uses crt;

var i,N,S:longint;

begin

Write('Nhap N:');Readln(N);

S:=2;

for i:=2 to N do

begin

if i mod 2 = 0 then S:=S+i;

end;

Write('Tong :',S);

readln

end.

Chúc bạn học tốt ^^

tick tick tick cho mik nha bạn

1,

-Tích cực:tăng năng suất lao động, không ngừng nâng cao mức sống và chất lượng cuộc sống của con người. Từ đó dẫn đến những thay đổi lớn về cơ cấu dân cư, chất lượng nguồn nhân lực, những đòi hỏi mới về giáo dục và đào tạo nghề nghiệp, sự hình thành một thị trường thế giới với xu thế toàn cầu hóa
-Tiêu cực:ô nhiễm môi trường, hiện tượng trái đất nóng dần lên, những tai nan lao động và tai nạn giao thông, các loại bệnh dịch mới.... và nhất là việc chế tạo nhựng loại vũ khi hiên đại có sức công phá hủy diệt khủng khiếp, có thể tiêu diệt sự sống của loài người

2,

1. Anh

=> Chủ nghĩa đế quốc Anh: “Chủ nghĩa đế quốc thực dân”.

2. Pháp

=> Chủ nghĩa đế quốc Pháp “chủ nghĩa đế quốc cho vay lãi”.

3. Đức

=> Chủ nghĩa đế quốc Đức “chủ nghĩa đế quốc quân phiệt, hiếu chiến”.

4. Mĩ

=> Mĩ chuyển sang giai đoạn đế quốc

Chúc bạn thi tốt ^^

Coidiên tích HCN ban đầu là 100%. Sau khi giảm chiều dài 20% và giữ nguyên chiều rộng thì diện tích sẽ giảm đi 20%. Vậy diện tích HCN lúc này bằng : 100% - 20% = 80%( diện tích HCN ban đầu). 
Để diện tích bằng 100% diện tích ban đầu thì diẹn tích cần tăng thêm là: 
20 : 80%= 25%(diện tích HCN đã giảm). Vậy để dt tăg 25% cho bằng dt HCN ban đầu thì chiều rộng cần tăng thêm 25%

- Địa hình: Có 3 miền địa hình:

Chúc bạn thi tốt ^^

số lớn là

(4888+(50*2))/2=2494

số bé là

4888-2494=2394

đáp số :...

ZnCl₂

Chúc bạn học tốt ^^

Readln(x);

X là biến cần nhập giá trị

Chúc bạn học tốt ^^