Câu 1 Tìm lỗi sai của các câu sau và sửa lại cho đúng a) Var 50a:Integer; b) For i:=200 to 1 do write(‘X’); c) S:=0; while s:=5 do s:=s+5; d) Var tb:

0 bình luận về “Câu 1 Tìm lỗi sai của các câu sau và sửa lại cho đúng a) Var 50a:Integer; b) For i:=200 to 1 do write(‘X’); c) S:=0; while s:=5 do s:=s+5; d) Var tb:”

1. a) Var 50a:Integer;            `->` var a: integer;
   b) For i:=200 to 1 do write(‘X’);    `->`for i:=1 to 200 do write (‘X’);
   c) S:=0; while s:=5 do s:=s+5;      `->` S:=0; while s<=5 do s:=s+5;
   d) Var tb:array(1,50) of real;      `->` Var tb:array[1..50] of real;

   Bình luận

2. a) Var a: Integer;

   b) For i:=1 to 200 do write (‘X’)

   c) S:=0;

   while S:=5 do

   End;

   s:=s+5

   d) Var tb: Array [1..50] of real;

   Bình luận