Введи пропущенные фрагменты

Дано целое число. Если оно является положительным, то умножить его на 8; если отрицательным, то прибавить к нему 185; если нулевым, то заменить его на 35. Вывести полученное число.

Для решения данной задачи была написана программа, некоторые фрагменты программы были утеряны. Введи пропущенные фрагменты

var

Q: [ ];

[ ]

\(\, \,\) writeln('Введите целое число:');

\(\, \,\) readln(Q);

\(\, \,\) if [ ] then [ ]

\(\, \,\) else

\(\, \,\) if [ ] then Q := Q +185

\(\, \,\) else [ ];

\(\, \,\) writeln(Q);

end.