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

Run Settings
LanguagePascal
Language Version
Run Command
program dhfjdskfh; var x, result: real; begin write('Введите вещественное число: '); readLn(x); if x > 0 then result := x + 2 else result := x - 4.6; writeLn('Полученное число: ', result:0:2); end.
Editor Settings
Theme
Key bindings
Full width
Lines