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

Question

Информатика

Руслан

13 ноября, 13:05

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

+1

Ответы (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.