(Pascal abc/turbo)
В результате выполнения программы должны быть выведены значения функции y=x3+2x для значений x, лежащих в диапазоне [1; 3], с шагом 0,2. Программу составьте двумя способами: используя цикл с предусловием и цикл с постусловием.
В результате выполнения программы должны быть выведены значения функции y=x3+2x для значений x, лежащих в диапазоне [1; 3], с шагом 0,2. Программу составьте двумя способами: используя цикл с предусловием и цикл с постусловием.
More Questions From This User See All
Answers & Comments
var
x, y: real;
begin
x := 1;
while x <= 3.01 do
begin
y := x * (x * x + 2);
Writeln(x:3:1, y:10:3);
x := x + 0.2;
end;
end.
var
x, y: real;
begin
x := 1;
repeat
y := x * (x * x + 2);
Writeln(x:3:1, y:10:3);
x := x + 0.2;
until x > 3.01;
end.