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.
Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.