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

237

329

Посмотреть ответы 2

Ответы на вопрос:

ЕгорРябцев

Информатика

4,7(40 оценок)

Тут не получится включительно 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.