Опубликовано 11.06.2017 по предмету Информатика от Гость >> <<

Помоги с программированием.Мне надо чтобы эта программа выполнялась в текстовом документе.А конкретнее её ответ.
var
i:integer;
function kalle(c:integer):integer;
begin
kalle:=c*24;
end;
begin
for i:=2 to 365 do
writeln(В ,i, днях ,kalle(i), часов );
end.
Надо чтобы writeln(В ,i, днях ,kalle(i), часов ); писалось в блокноте

Ответ оставил Гость

Вам необходимо в теле программы добавить инициализацию файла для вывода
Assign(output, <путь к файлу>) rewrite(output);