составить алгоритм и программу вывода на экран таблицы значений y=2sinx для всех значений x от 0,1 до 0,6 с интервалом 0,1

var x,y:real;beginx:= 0.1;writeln('x ':6,' y':6);while x<0.7 dobeginy:= 2*Sin(x);writeln(x :6, y:9:3);x:= x + 0.1;end;end.