Câu 6

String gồm các xâu kí tự có độ dài ko vượt quá 255 kí tự

Câu 7

- Ta sẽ nhập được 5 phần tử của mảng

Câu 8

Sửa lại

a) var X: array[1..15] of integer;

b) var X: array[3..8] of integer;

c) var X: array[1..10] of integer;

d) var X: array[1..30] of real;

Câu 9

uses crt;

var a,b : real;

begin

clrscr;

write('nhap so a la: ');readln(a);

write('nhap so b la: ');readln(b);

If (a<b) then writeln('so b lon hon so a')

   else  If (a>b) then writeln('so a lon hon so b')

             else writeln('hai so bang nhau');

readln;

end.

câu 7: ta sẽ nhập giá trị 5 phần tử mảng

câu 8: sữa

a) var X:array[1..15] of integer;

b) var X:array[3..8] of integer;

c) var X:array[1..10[ of integer;

d) var X:array[1..30] of real;

câu 9:                         

program ct;

uses crt;

var a,b:integer;

begin

clrscr;

write('nhap a:=');readln(a);

write('nhap b:=');readln(b);

   if a>b then writeln('a lon hon b');

   if a<b then writeln('b lon hon a') else writeln('a bang b');

readln

end.