Вычислить и напечатать значения функции: У=Х2+4, при значениях аргумента Х, изменяющихся от 30 до -3 с шагом -1.
Паскаль!!!
Ответы
Ответ дал:
0
Ответ:
program noname;
var x,y :real;
begin
x:=-3;
While (x <= 3) do
Begin
if (x <> 0) then
Begin
y:=y+x-1;
Writeln(x:4:1, ' ',y:4:1);
End;
x:=x+0.1;
End;
Readln;
end.
Sanyata135:
А можно через цикл for?
Вас заинтересует
1 год назад
1 год назад
1 год назад
1 год назад
7 лет назад
7 лет назад
8 лет назад