Question

While и repeat!
3. Вывести на экран таблицу значений функции y:=vx (корень из х) на интервале [2; 7] c шагом 0.5.

Answer 1

var i:real;
begin
  i:= 2;
  while(i <= 7) do
  begin
    writeln('При x = ', i, '  y = ', sqrt(i));
    i:= i + 0.5;
  end;
 
end.