помогите пожалуйста
паскаль

1.) read(a, b);

   writeln(a * b);

   writeln(2*a + 2*b);

2) read(a, b);

    writeln((a * b) / 2);

   writeln(a + b + sqrt(a*a + b*b));