Question

Создать текстовый документ с помощью Паскаля, в котором N строк и M символов в строке, и символы-цифры 1,2....

Answer 1

  program proga_25_1;
 Var
A: text;     
i,j,n,m : byte;     
 d: string;     
Sim:char;
 Begin             
write('Введите имя текстового файла   ');  {Например: "test" он создастся там где находится сама программа }               
read(d);                                       
 Assign(A,d);               
 rewrite(A);                   
 write('Введите количество строк: N= ');                        
readln(n);                   
 write('Введите количество символов в строке: M= ');                     
  readln(m);                                     
for I:=1 to n do                   
 begin                         
 Sim:=Chr(Ord('1')+I-1);                         
  For J:=1 to m do                             
  write(A,Sim);                               
 writeln(A);                 
  end;                         
  close(A);
end.     

Answer 2

Конечно, я могу помочь вам создать текстовый документ с помощью Паскаля, который будет содержать N строк и M символов в каждой строке. В каждой строке будут использоваться цифры от 1 до 9 в порядке возрастания.

Вот пример кода на Паскале, который создаст такой текстовый документ:

program CreateTextDocument;
uses
  SysUtils;

const
  N = 5; // Количество строк
  M = 10; // Количество символов в строке

var
  TextDocument: Text;
  i, j: Integer;

begin
  Assign(TextDocument, 'text_document.txt'); // Имя файла для сохранения текстового документа
  Rewrite(TextDocument);

for i := 1 to N do
  begin
    for j := 1 to M do
    begin
      Write(TextDocument, IntToStr(j)); // Записываем цифру в файл
    end;
    Writeln(TextDocument); // Переходим на новую строку
  end;

Close(TextDocument);
end.

После выполнения этого кода, вам будет доступен текстовый документ с именем "text_document.txt". Он будет содержать N строк и M символов в каждой строке, где символы будут представлять собой цифры от 1 до 9.

Надеюсь, это поможет вам создать нужный текстовый документ с помощью Паскаля! Если у вас возникнут дополнительные вопросы, пожалуйста, дайте мне знать.