Ответы
Ответ дал:
0
Попробуй так
program Calculator;
var
x, b: real;
begin
{ Задаємо значення x }
x := 24.5;
{ Розрахунок b за заданим виразом }
b := 6 * abs(x - 7 * power(x, 2)) + 4 * x - 5 * x + 6;
{ Виведення b з одним знаком після коми }
writeln('b = ', Format('%0.1f', [b]));
{ Виведення цілої частини числа b }
writeln('b = ', Trunc(b));
end.
program Calculator;
var
x, b: real;
begin
{ Задаємо значення x }
x := 24.5;
{ Розрахунок b за заданим виразом }
b := 6 * abs(x - 7 * power(x, 2)) + 4 * x - 5 * x + 6;
{ Виведення b з одним знаком після коми }
writeln('b = ', Format('%0.1f', [b]));
{ Виведення цілої частини числа b }
writeln('b = ', Trunc(b));
end.
Вас заинтересует
2 месяца назад
2 месяца назад
2 месяца назад
1 год назад
7 лет назад