Question

решать с применением цикла с постусловием:

Написать программу паскаль табулирования функции на заданном промежутке с шагом 0.2

Answer 1

Ответ:

var

 x,y:real;

begin

 x:=0.1;

 repeat

   y:=x*x+sin(5*x);

   writeln('y(',x,')=',y);

   x:=x+0.2;

 until x>=2.1;

end.

Объяснение: