Тест по теме:Программирование на языке Паскаль. 1) В результате выполнения программы:program Demo;const Limit=5;var count,sum:integer;Begincount:=0; sum:=0;while (count 30 then y:=k/2-4else y:=k/3+2*k-1;Write('y=',y); End. y=11y=39y=69y=305) При использовании оператора выбора Сase значение выражения - селектора может быть типа: integer, word, boolean, stringinteger, real, boolean, char integer, byte, word, boolean, char, shortint integer, byte, word, boolean, real6) При описании переменной строкового типа ( идентификатор: string[. . . ]; ) указывается:минимальная длина строкимаксимальная длина строки фактическая длина строки7) В результате выполнения функции COPY(St, 2, 3), где St:='ABCDEFG'получим результат: 'BC' 'CD' 'BCD' 'CDE'8) Что будет выведено на экран монитора в результате выполнения программы:Program pr1;var Sl:string[12];I,J:integer;beginSl:='111{333}999';I:=Pos('{',Sl); J:=Pos('}',Sl);Delete(Sl,I,J-1+I);Write(Sl);end. --------------------111333 111999 9999) После выполнения программы цифры будут расположены в следующейпоследовательности:Program pr2;const M:array[1. . 4] of byte=(9,11,3,2);var I,J,N:byte;beginfor I:=1 to 3 dofor J:=I+1 to 4 do begin if M[I]begin N:=M[I]; M[I]:=M[J]; M[J]:=N; end;end; end. ---------------------------------------2,3,11,911,9,3,2 2,3,9,11 9,11,2,310) Какие результаты выполнения выражений правильны:11 DIV 5=110 DIV 3=311 MOD 5=114 MOD (5+3)=2