Составить на алгоритмическом языке PASCAL программу вычисления значений функции: Z = ( x² - 4x + 8,1)d Пределы изменения х: [0;1] Шаг в цикле: 0,07 Используемый оператор в цикле: FOR

Составить на алгоритмическом языке PASCAL программу вычисления значений функции: Z = ( x² - 4x + 8,1)d Пределы изменения х: [0;1] Шаг в цикле: 0,07 Используемый оператор в цикле: FOR
Гость
Ответ(ы) на вопрос:
Гость
Так... Тут не получится включительно 1, ибо шаг не делится нацело... Но 0,98) Вот, лови)) var   Z, x, d: real;   i: integer; begin   writeln('Enter d:');   readln(d);     for i := 0 to trunc(1 / 0.07) do   begin     x := 0.07 * i;     Z := (sqr(x) - 4 * x + 8.1) * d;     writeln('Z(', x:1:2, ', ', d, ') = ', Z);   end; end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы