Em hãy tìm ra chỗ sai và sửa lại cho chính xác chương trình in ra các số program in_so_lon; uses crt; var i,n:integer; begin clr scr readln(n) i=1

0 bình luận về “Em hãy tìm ra chỗ sai và sửa lại cho chính xác chương trình in ra các số program in_so_lon; uses crt; var i,n:integer; begin clr scr readln(n) i=1”

1. – Chương trình không đảm bảo kết cấu và nội dung.

   Sửa lại: 
   program in_so_lon;
   uses crt;
   var i,n: integer;
   begin
    clrscr;
    readln(n,i); 
    if n>i then writeln(n)
    else if n<i then writeln(i) else writeln(‘n=i’);
    readln
   end. 

   Bình luận

2. Lỗi sai : Chưa có câu lệnh kết thúc chương trình. Một số lỗi như thiếu ; trong câu lệnh khi kết thúc.

   Sửa lại :

   program in_so_lon;

   uses crt;

   var i,n : integer;

   begin

   clrscr;

   readln(n);

   i:=1;

   write(n,i);

   readln 

   end.

   Bình luận