Question

КУКУ!""!№!!2 помогите с cif 8-9 в праграме паскаль абаца

Answer 1

8.

uses Robot;

begin

 Task('cif8');

 while freefromright do

 begin

 right;

 if wallfromup then

 begin

 down;

 paint;

 up

 end;

 if wallfromdown then

 begin

 up;

 paint;

 down

 end

 end

end.

9.

uses Robot;

begin

 Task('cif9');

 while freefromright do

 begin

 right;

 if wallfromdown and wallfromup then paint

 else if wallfromup then

 begin

 down;

 paint;

 up

 end

 else if wallfromdown then

 begin

 up;

 paint;

 down

 end;

 end

end.

Answer 2

Привет! Я рад помочь с программой на языке Паскаль. Однако, уточни, что именно ты хочешь сделать с числами 8 и 9 в этой программе. Нужно ли их сложить, вычесть, умножить или выполнить другую операцию? Пожалуйста, уточни свой вопрос, чтобы я мог дать более подробный ответ.