program NhapKytu;
var
  KyTu: string[1]; // Biến để lưu ký tự được nhập
  SoO: integer;    // Biến để lưu số ô
  i: integer;      // Biến đếm

begin
  Write('Nhap so o: ');
  ReadLn(SoO);

  // Kiểm tra số ô có hợp lệ không
  if (SoO < 1) or (SoO > 61) then
  begin
    WriteLn('So o khong hop le. Nhap lai.');
    Exit; // Kết thúc chương trình nếu số ô không hợp lệ
  end;

  for i := 1 to SoO do
  begin
    Write('Nhap ky tu thu ', i, ': ');
    ReadLn(KyTu);
    // In ký tự lên màn hình sau khi nhập
    WriteLn('Ky tu da nhap: ', KyTu);
  end;

  ReadLn; // Để chương trình không tự đóng ngay sau khi thực hiện xong
end.