Что будет выведено на экран после выполнения программы? type dvig = (vverh, vniz, vpravo, vlevo); var x, y: dvig; t: (vpered, nazad); k: integer; Begin T:=nazad; X:=vniz; Case x of Vverh, vniz: k:=1; Else k:=0; End; Writeln (k); End.
Что будет выведено на экран после выполнения программы? type dvig = (vverh, vniz, vpravo, vlevo); var x, y: dvig; t: (vpered, nazad); k: integer; Begin T:=nazad; X:=vniz; Case x of Vverh, vniz: k:=1; Else k:=0; End; Writeln (k); End.