Переписать, исправив ошибки в программе:

Program Primer;

Var x, y : integer;

Begin

X=0;

While x > = 3.1 do

begin

Y: = sin (x) ;

Writeln (x, y) ;

X:=x+0.1;

End;

End.

Question

Атламыш

4 мая, 04:24

+4

Ответы (1)

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

Сокорра · Answer 1

Program Primer;

Var x, y : real;

Begin

X:=0;

While x > = 3.1 do

begin

Y : = sin (x) ;

Writeln (x, y) ;

X:=x+0.1;

End;

End.

Переписать, исправив ошибки в программе:Program Primer;Var x, y : integer;BeginX=0;While x > = 3.1 dobeginY: = sin (x) ;Writeln (x, y) ;X:=x+0.1;End;End.