Ответы
Ответ дал:
0
Код программы:
var A, x:real;
begin
writeln('Введите x');
readln(x);
if x-4 = 0 then
writeln('Нельзя делить на 0!')
else begin
A := ((51*sqrt(x*x*x))/ (x-4));
writeln('Результат A = ', A);
end;
end.
Вас заинтересует
1 год назад
1 год назад
1 год назад
6 лет назад
6 лет назад
8 лет назад