Определите, что выведет на экран программа при вызове f(9). procedure f(n: integer); begin write(n); if n > 3 then begin f(n – 4); f(n div 2); end; end; сложность этой в том, что вывод стоит до условий, а не в нем. как тогда рассуждать?

ну ты просто выдумал себе сложности, при вызове f она выведет 9, паскаль не знаю, но точно , что это так.

сначала идёт вывод переменной а потом операции с ней, ничего додумывать не нужно.

карандаш - графит; ископаемое, состоящее из угля и желез это же вещество, вставленное пруточками в деревянную трубочку, для черченья и рисованья.

2)program nah;

  var s: string;

begin

s: = 'рэки,горы и ';     (присвоение значения)

writeln (s);                               (вывод)

delete (s, 5,6);                     (удаление из строки s начиная с 5-го символа 6) символа)

writeln(s);                           (вывод результата)

end. 

  решение будет выглядеть так

  рэки, горы и

рэки и  

прости что не решила