Question

Viết câu lệnh theo yêu cầu: a) Sử dụng câu lệnh lặp in ra màn hình 10 câu tên của mình b) Khai báo tên mảng M, với chỉ số đầu là 1, chỉ số cuối là 100, kiểu dữ liệu số nguyên

Answer 1

a)

program TenCuaMinh;
var
  i: integer;
begin
  for i := 1 to 10 do
    writeln('Tên của mình là: <tên>');
end.

b)

program MangSoNguyen;
var
  M: array[1..100] of integer;
begin
end.