Ответ: a) writeln(c);б) var a, s: integer;в) r := p — q;2. а)953 (после writeln происходит переход на новую строку, после write — нет)2. б)85-35+1=6