Câu 2:

program DaySoCuaAn;

uses crt;

var i:byte;

begin

         clrscr;

         for i:=1 to 20 do write(i);

         readln;

end.

Câu 3:

Kết quả chạy chương trình của An là ghi các số trên cùng 1 dòng, còn của Nga là nhiều dòng khác nhau.

So sánh sự khác nhau:

-) CT của An sử dụng câu lệnh lặp với số lần biết trước For...to...do

-) CT của Nga sử dụng câu lệnh lặp với số lần chưa biết trước While...do

program day_so_cua_An;  {sai vì tên không được có dấu cách và thiếu;}

uses crt;

var i:byte;    {vì chạy ở dưới thì giá trị đầu và cuối là giá trị nguyên}

begin

     clrscr;

     for i:=1 to 20 do write(i);

     readln;

end.

-Bài của An sẽ in các số từ 0 đến 20 theo cùng 1 hàng và không có dấu ngăn cách

`->`01234567891011121314151617181920.

-Bài của Nga sẽ in các số từ 0 đến 20, mỗi số trên 1 hàng

`->`

0

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

20

-Khác biệt ở chỗ vòng lặp bạn an sử dụng là for...do, còn bạn Nga sử dụng là while...do;

Khác về cách in số, Bạn An thì in các số trên 1 hàng và không có dấu ngăn cách, bạn Nga thì in mỗi số trên 1 hàng.