hehe mod tử đằng

Complete the following sentences with can/could or be able to

1. A good 1500-runner ....................... run the race in under four minutes

.2. Bill is so unfit, he ....................... run at all!

3. Our baby is only nine months and he ...................... already stand up.

4. When I was younger, I ...................... speak Italian much better than I ....................... now.

5. ....................... she speak German very well? – No, she ....................... speak German at all.

6. He ...................... draw or paint at all when he was a boy, but now he’s a famous artist.

7. After weeks of training, I ....................... swim a length of the baths underwater.

8. Ii took a long time, but in the end Tony ...................... save enough to buy his own hi-fi

.9. Did you buy any fresh fish in the market? – No, I ....................... get any.

10. For days the rescuers looked for the lost climbers in the snow. On the fourth day they saw them and ....................... reach them without too much trouble.

11. He was very strong, he ....................... ski all days and dance all night.

12. The car plunged into the river. The driver ....................... get out but the passenger was drowned.

13. I was a long way from the stage. I ...................... (negative) see all right but I ....................... hear very well.

14. We ....................... borrow umbrella, so we didn’t get wet.

15. ....................... you walk or did they have to carry you?

16. I had no key so I ....................... (negative) lock the door.

17. I knew the town, so I ...................... advise him where to go.

18. When the garage had repaired our car we ...................... continue our journey.

19. At five years old, he ....................... read quite well.

20. When I arrived, everyone was asleep. Fortunately, I ....................... wake my sister and she let me in

.21. The swimmer was very tired but he ....................... reach the shore before he collapsed

22. The police were suspicious at first but I ...................... convince them that we were innocent.

 

uses crt;
var A : array [1 .. 100] of integer;
i, n : integer;
begin
clrscr;
write('Nhap so phan tu : '); readln(n);
for i := 1 to n do
    begin 
        write('Nhap so thu ', i ,' : ');
        readln(A[i]);
    end;
write('Cac so chan : ');
for i := 1 to n do
    if A[i] mod 2 = 0 then 
        write(A[i],' ');
readln
end.

uses crt;
var A : array [1 .. 10] of integer;
i, n, d : integer;
begin
clrscr;
d := 0;
write('Nhap so luong phan tu : '); readln(n);
for i := 1 to n do
    begin
        write('Nhap so thu ', i ,' : ');
        readln(A[i]);
        if A[i] mod 2 = 0 then 
            d := d + 1;
    end;
write('Cac phan tu vua nhap : ');
for i := 1 to n do write(A[i],' ');
writeln; write('Day co ', d ,' so chan ');
readln
end.

uses crt;
var A : array [1 .. 10] of integer;
i, n, d : integer;
begin
clrscr;
d := 0;
write('Nhap so luong phan tu : '); readln(n);
for i := 1 to n do
    begin
        write('Nhap so thu ', i ,' : ');
        readln(A[i]);
        if A[i] mod 2 = 0 then 
            d := d + 1;
    end;
write('Cac phan tu vua nhap : ');
for i := 1 to n do write(A[i],' ');
writeln; write('Day co ', d ,' so chan ');
readln
end.

uses crt;
var A : array [1 .. 10] of integer;
i : integer;
begin
clrscr;
for i := 1 to 10 do
    begin
        write('Nhap so thu ', i ,' : ');
        readln(A[i]);
    end;
write('Cac gia tri chan : ');
for i := 1 to 10 do
    if A[i] mod 2 = 0 then 
        write(A[i], ' ');
readln
end.

uses crt;

var C : array [1 .. 50] of integer;

i, n : integer;

begin

clrscr;

write('Nhap so phan tu : '); readln(n);

write('Nhap day gom ', n ,' so : ');

for i := 1 to n do read(C[i]);

write('Cac gia tri chan : ');

for i := 1 to n do

if C[i] mod 2 = 0 then write(C[i], ' ');

readln

end.

uses crt;

var A : array [1 .. 50] of integer;

i, n : integer;

begin

clrscr;

write('Nhap so phan tu : '); readln(n);

write('Nhap day gom ', n ,' so : ');

for i := 1 to n do read(A[i]);

write('Cac gia tri chan : ');

for i := 1 to n do

if A[i] mod 2 = 0 then write(A[i], ' ');

readln

end.