Дистанционный практикум по программированию

Дан текст синтаксически правильной программы на языке pascal. Необходимо удалить из неё все инструкции вывода (т.е. write и writeln). Всё остальное должно остаться без изменений.

Примечание 1. Имена write и writeln в программе не переопределяются.

Примечание 2. Точка с запятой не является частью оператора.

Исходные данные

Входной поток содержит текст программы.

Результат

Выходной поток должен содержать преобразованный текст.

Пример

Var
 write_sample: String;
begin
 {продемонстрируем удаление write и writeln}
 write_sample := 'write(write_sample)';
 write(write_sample);
 writeln;
end.

Var
 write_sample: String;
begin
 {продемонстрируем удаление write и writeln}
 write_sample := 'write(write_sample)';
 ;
 ;
end.