напишите пожалуйста схему в программке PascalABC по этой таблице

Напишите пожалуйста схему в программке PascalABC по этой таблице

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

program HelloWorld;

var x,y: double;

begin

 

   

    writeln('Введите значение x и y:');

    readln(x);

    readln(y);

   

  

   

    while (xlt;0) do

    begin

        if(xlt;y) then

        begin

        x:= x+1;

        y:= y/2;

        end

        else

        begin

        x:= x+3;

        y:= y-2;

        end;        

    end;

   

    x:= x-5;

    y:= y+3;

   

    writeln(x);

    writeln(y);

 

end.

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


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

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

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

Войти на сайт