Помогите составить программу, которая создает текстовый файл, содержащий 12 чисел введенных с клавиатуры.

Question

Информатика

Санюха

16 декабря, 20:54

Помогите составить программу, которая создает текстовый файл, содержащий 12 чисел введенных с клавиатуры.

+3

Ответы (1)

Знаете ответ на вопрос?

Фавста · Answer 1

begin

var n: integer;

var i: byte;

for i : = 1 to 12 do

begin

readln (n) ;

System. IO. File. AppendAllText ('program1. log', n. ToString ()) ;

end;

end.