Переписать, исправив оплошности в программке:Program Primer;Var x,y :

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

Program Primer;
Var x,y : integer;
Begin
X=0;
While x gt;= 3.1 do
begin
Y:= sin(x);
Writeln(x,y);
X:=x+0.1;
End;
End.

Задать свой вопрос
1 ответ

Program Primer;

Var x, y : real;

Begin

X:=0;

While x gt;= 3.1 do  

begin

Y := sin(x);

Writeln(x,y);

X:=x+0.1;

End;

End.

, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт