• Найдите значения функций У=Х^2+1, для X= 0,2;0,4;0,6;...;20.

Ответы 1

  • var    x, y : Real;begin

       x := 0.2;

     

       while x <= 20 do    begin       y := sqr(x) +1 ;       Writeln(x:0:1 ,'^2 + 1 = ', y:0:2);       x := x + 0.2;    end;    ReadLn;end.

     

    • Автор:

      imogen
    • 5 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years