Лекция "Создание файла и запись данных в него"

  • Лекции
  • docx
  • 14.03.2017
Публикация на сайте для учителей

Публикация педагогических разработок

Бесплатное участие. Свидетельство автора сразу.
Мгновенные 10 документов в портфолио.

Создание файла и запись данных в него var f: file of char; c: char; i, n: byte; begin assign (f, 'c:\file.txt'); rewrite (f); write ('Количество символов: '); readln (n); for i:=1 to n do begin write ('Введите символ: '); readln (c); write (f, c); end; close (f); end.
Иконка файла материала 202..docx
Создание файла и запись данных в него var     f: file of char;     c: char;     i, n: byte;   begin     assign (f, 'c:\file.txt');     rewrite (f);       write ('Количество символов: ');     readln (n);       for i:=1 to n do begin         write ('Введите символ: ');         readln (c);         write (f, c);     end;       close (f);   end.