Cho chương trình dưới đây tính diện tích hình vuông .Hãy tìm những lỗi sai và sửa lại cho đúng Program Hinh_vuong; Uses crt var a , integer ;

Cho chương trình dưới đây tính diện tích hình vuông .Hãy tìm những lỗi sai và sửa lại cho đúng
Program Hinh_vuong;
Uses crt
var a , integer ;
S: real;
Begin
Write ( ‘Nhap canh hinh vuong : ‘) readln(a);
S := a x a;
( ‘Dien tich hinh vuong la: ‘ , S);
readln
end.

0 bình luận về “Cho chương trình dưới đây tính diện tích hình vuông .Hãy tìm những lỗi sai và sửa lại cho đúng Program Hinh_vuong; Uses crt var a , integer ;”

  1. Lỗi 1: uses crt → uses crt;

    Lỗi 2: a , integer → a: integer;

    Lỗi 3: Write ( ‘Nhap canh hinh vuong : ‘) → Write ( ‘Nhap canh hinh vuong : ‘);

    Lỗi 4: S:=a x a; → S:=a*a;

    Lỗi 5: ( ‘Dien tich hinh vuong la: ‘ , S); → Write(‘Dien tich hinh vuong la:’, S);

    Viết lại chương trình:

    Program Hinh_vuong;

    Uses crt;

    Var a: integer;

          S: real;

    Begin

             Write(‘Nhap canh hinh vuong: ‘); readln(a);

             S:=a*a;

             Write(‘Dien tich hinh vuong la:’, S:0:0);

             Readln

    End.

    Bình luận
  2. Program Hinh_vuong;

    Ues crt;

    Var a: integer;

           S : real;

    Begin

                 Clrscr;

      Write( ‘Nhap canh hinh vuong: a’) ; Readln(a);

            S := a*a;

     Writeln(‘Dien tich hinh vuong la: ‘ , S : 10 : 2);

           Readln;

    End.

    Bình luận

Viết một bình luận