Cho chương trình Pascal sau:

Program chuvi_duongtron :

uses crt;

const pi := 3.14;

var cv, r: real;

Begin

clrscr;

write(‘nhap ban kinh r = ‘);

 writeln(r);

cv:= 2*pi*r;

writeln(‘chu vi duong tron la: ‘,cv:10:2, ‘ m’);

readln

Hãy chỉ ra bốn lỗi có trong chương trình, sau đó hãy sửa lại cho đúng.

Cho chương trình Pascal sau:

Program chuvi_duongtron:

uses crt;

const pi = 3,14;

var cv, r: real;

Begin

    clrscr;

    write(nhap ban kinh r = );

    readln(r);

    cv:= 2*pi*r;

    writeln(‘chu vi duong tron la: ‘,cv:10:2, ‘ m’);

 readln

Hãy chỉ ra bốn lỗi có trong chương trình, sau đó hãy sửa lại cho đúng.

Cho chương trình Pascal sau:

Program dientich_duongtron;

uses= crt;

const pi = 3.14;

var: dt, r: real;

clrscr;

write(‘nhap ban kinh r = ‘);

readln(r);

dt = pi*sqr(r);

writeln(‘dien tich duong tron la: ‘,dt:10:2, ‘ m’);

readln

End.

Hãy chỉ ra bốn lỗi có trong chương trình, sau đó hãy sửa lại cho đúng.

Cho đoạn chương trình sau. Em hãy tìm lỗi sai và sửa lại, sắp xếp  cho đúng?

                        Tính giá trị biểu thức: 12.x – 30 + 12

              Uses CRT:

          Clrscr.

            Begin

           Writeln(‘Gia tri bieu thuc 12.x – 30 + 12 = ’ , 12 *x – 30 + 12: 5:3)

           Program Tinh _gia_tri_bieu_thuc;

            Var x: Real;

            Write(‘Nhap gia tri x:  ’); readln(x);

            Readln;

            End.