Конструкция
если <условие> то <список команд 1> иначе <список команд 2> на Pascal пишется так:
Код:
if <условие> then begin <список команд 1> end else <список команд 2>;
, возможно использование вложенных условий.
Для вычисления корня квадратного используйте функцию sqrt(аргумент).
Команда присваивания выглядит следующим образом y
:=x*x.
Основные операторы для решения я вам описал, теперь дело за вами