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

Question

Информатика

Филиппа

30 марта, 02:33

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

+5

Ответы (1)

Знаете ответ на вопрос?

Валериан · Answer 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.