Запиши математическое выражение (1+s) ^2 на языке Паскаль

Для записи математического выражения (1+s) ^2 на языке Паскаль вы можете использовать следующий код:

var s, result: real; begin readln(s); result := sqr(1 + s); writeln(result); end.