Неозаглавленный

Run Settings
LanguagePascal
Language Version
Run Command
program prrgegergh; var Q: real; begin writeln('Введите число Q:'); readln(Q); if (Q > 9) and (Q <= 90) then Q := Q + 6; writeln('Результат: ', Q:0:2); end.
Editor Settings
Theme
Key bindings
Full width
Lines