pascal nha bạn:

Program so_nguyen_chan;

uses crt;

var n,i:integer;

begin

writeln('Nhap n=');readln(n);

For i:=1 to n do

If i mod 2 = 0 then writeln('Cac so chan nho hon n la: ',i);

readln

end.

Cho một chuỗi gồm cả chữ và số.

Yêu cầu:xuất ra màn hình các dòng chữ số riêng, chữ riêng.

In ra các số có trong dãy thỏa mãn đk:Các số bé nhất đứng trc, kế tiếp là các số lớn nhất, tiếp theo là các số còn lại không thay đổi giá trị.

1. Yesterday, they (go) went to the cinema with together.

2. Linh is (tall) taller than Minh.

3. My father (work) worked in a factory last year.

4. We (going to) are going to go the hospital to meet Mrs. Nga.