Напишите программу для записи в файл десяти чисел вводимых с клавиатуры.

Var f: text ; c: array [1..10] of integer; i: integer; begin for i: =1 to 10 do begin  writeln ('введите  ',i,' число'); read(c[i]); end; assign (f,'res.txt'); rewrite(f); for i: =1 to 10 do write (f,'  ',c[i]); close (f); end. писал на pascal abc. для того, чтобы работала, тебе нужно создать папку, и в этой папке сохранить данную программу. после запуска, тебе нужно будет ввести 10 чисел. результат сохранится в той папке, в которой будет сохранена программа !

Var   i, temp : integer; begin     assign(output, 'output.txt'); rewrite(output);   for i to 10 do begin      read(temp);       write(temp);   end; end.файл output.txt должен быть создан. 

Смотря какая  быстрозавариваемой допустим это ролтон, тогда  алгоритм такой. 1) раскрываем пакетик 2) вываливаем лапшу  в тарелку 3) добавляем специи 4) завариваем лапшу если не следовать алгоритму, то нет смысла его использовать. например, вначале выполним пункт 2 и 3, а затем 1 и 4. что у нас получится? нарушая пункт 1 мы переходим к пункту 2, но тут проблема, мы не можем вывалить лапшу, ведь мы не открыли пакетик. здесь идет явное нарушение алгоритма и дальнейшее его использование не валидно.

Нужно так закодировать, чтобы ни один код не был началом другого: е   000; т   001;     к 010;     и 011;     д 100;   в   101   (в 2сс)       0           1             2           3           4             5     (в 10сс) д       е     т       е         к       т     и       в 100   0 00 001   000   010   001   01 1   101 =   80845d (в16сс) < --oтвет