Программирование на си робот может перемещаться в четырех направлениях( n- север, w - запад, s - юг, e - восток) и принимать пять цифровых команд : 0 - остановка, 1 - продолжать движение, -1 - движение реверсом, 2 - поворот направо, -2-поворот налево. дан символ c - исходное направление робота и целое число n - посланная ему команда. вывести направление робота после выполнения каждой полученной команды, вплоть до остановки.

#include < stdio.h> int main() {     int n;     char c;     printf("исходное направление робота (n,w,s,e): ");     scanf("%c",& c);     printf("команда (0,1,-1,2,-2): ");     scanf("%d",& n);     while (n ! = 0){     switch (n) {     case 1 : break;     case -1:     switch (c) {     case 'n' : c = 's'; break;     case 'w' : c = 'e'; break;     case 's' : c = 'n'; break;     case 'e' : c = 'w'; break;     };     break;     case 2 :         switch (c) {     case 'n' : c = 'e'; break;     case 'w' : c = 'n'; break;     case 's' : c = 'w'; break;     case 'e' : c = 's'; break;     };     break;     case -2:         switch (c) {     case 'n' : c = 'w'; break;     case 'w' : c = 's'; break;     case 's' : c = 'e'; break;     case 'e' : c = 'n'; break;     };     break;     }     printf("c = %c\n", c);     printf("команда (0,1,-1,2,-2): ");     scanf("%d",& n);     }     return 0; } пример: исходное направление робота (n,w,s,e): nкоманда (0,1,-1,2,-2): 2c = e команда (0,1,-1,2,-2): 1c = e команда (0,1,-1,2,-2): -2c = n команда (0,1,-1,2,-2): -1c = s команда (0,1,-1,2,-2): 0

1 uses graphABC,crt;

2 var i,x,y,x2,y2,x3,y3: integer;

3 begin

4 setwindowsize(500,500);

5 lockdrawing;

6 hidecursor;

7 repeat

8 clearwindow;

9 setpenwidth(1);

10 setbrushcolor(clblack);

11 circle(250,200,20);

12 setbrushcolor(clbrown);

13 rectangle(100,200,400,400);

14 setbrushcolor(clwhite);

15 roundrect(110,210,350,390,40,40);

16 for i:=1 to 10000 do

17  putpixel(random(235)+112,random(171)+215,clblack);

18 setbrushcolor(clblack);

19 for i:=1 to 5 do

20 circle(375,210+(i*25),10);

21 circle(375,370,15);

22 setbrushcolor(clwhite);

23 rectangle(372,360,378,380);

24 setpenwidth(5);

25 x:=250; y:=197;

26 x2:=x-40-random(10);

27 y2:=y-150-random(10);

28 x3:=x++40+random(10);

29 y3:=y-150-random(10);

30 line(x,y,x2,y2);

31 line(x,y,x3,y3);

32 circle(x2,y2,10);

33 circle(x3,y3,10);

34 sleep(2);

35 redraw;

36 until keypressed;

37 end.