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

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

Евпроб

16 января, 10:53

+5

Ответы (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.