Написать программу в паскале с таким условием если х>50,то х+ корень из 36,иначе х>50 ,то...

Question

Написать программу в паскале с таким условием если х>50,то х+ корень из 36,иначе х>50 ,то х умножить на корень из 25

Answer 1

var
  x: real;
begin
  Write('Введите x = ');
  Readln(x);
  if x > 50 then
    x := x + sqrt(36)
  else
    x := x * sqrt(25);
  writeln('x = ', x);  
end.