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