Question

Напишите программу, которая считывает с клавиатуры переменные данные a, b, c и вычисляет следующие выражения:
При любых значениях переменных программа выполняется корректно? С чем это связано?

Answer 1

В 3-ем может быть ошибка. У меня 2-ой месяц нет матана, так что извиняй если что =) А так сама программа составлена правильно

var
  a, b, c, o1, o2, o3: real;

begin
  writeln('Введите a,b и c через пробел');
  readln(a, b, c);
  o1 := sqrt(2 * a - 3) / b - 1 + sqrt(sqr(c) + a * c + sqr(a));
  o2 := sqrt(2 + sqrt(2 + sqrt(b + sqrt(abs(c - a)))));
  o3 := 1 / 1 + 1 / a + 1 - b / 1 - c;
  writeln('a) ', o1);
  writeln('b) ', o2);
  writeln('c) ', o3);
end.