КОНТРОЛЬНЫЙ ТЕСТ (Паскаль) 1 курс1. Какой тип алгоритма необходимо применить, если последовательность команд выполняется последовательно в заданном порядке?1) циклический2) разветвляющийся3) линейный4) простой2. Указать тип величины, если её значение равно: 36.61) строковый или текстовый (string)2) целочисленный (integer)3) символьный (char)4) вещественный (real)3. Выбрать допустимые значения для переменных целочисленного (Integer) типа: 'а';5; 0.5; 19; 3.64; 44; 'a+5'1 )'а'; 5; 19; 44; 2) 0.5; 3.643) 'a'; 'a+5'4) 5; 19; 445 ) нeт допустимых значений4. Тип REAL (вещественный) используется для переменной, обозначающей: 1 )год поступления в колледж2) вес шкафа3) количество кафедр в институте4 )восклицательный знак5. Тип CHAR (символьный) используется для переменной, обозначающей: 1 )количество гостей на празднике2) вес грузовика3) букву латинского алфавита4) породу собаки6. Что будет выведено на экран после работы операторов:А:=-1; В:=10; А:=А+В; Writeln(B,‘ A=’,A);1 ) A=-1 102 ) 10 A=-13 ) 10 A=94) B=10 A=97. Выбрать верный результат целочисленного деления: 9 Div (17 Mod 7)1 )1;2 )3;3 )0;4 )4.8. Выбрать правильную запись на языке Паскаль оператора ввода с клавиатуры значений трём вещественным переменным:1)Read(x;y;z);2) ReadLn(X, Y, Z);3) Readln (X:4:1, Y:4:1, Z:4:1);4) Writeln (‘Vvedi X, Y, Z’);9. показывающего, что значения переменной X находятся на промежутке [0;5), на языке Паскаль имеет вид:0<=Х<51) Х>=0 and X<52) (X>=0) and (X<5)3) (X>=0) OR (X<5)10 .Отметить правильно записанные условные операторы:1 )if X >Y then write (X*X) ; else write (Y+Y);2) if X +1>10 then begin Y:=X; write (X,Y); end; 3) if S=0 then read (x);4 )if B<>0 then write (B) else B:= 1;5) if a:=1 then write (a) else write ('Privet!');11. Выбрать верный результат, если ввели S=2 (ответ в скобках):1) If S=0 Then Write (s) else write (S+1); { 2 }2) if S >=0 Then Write (s*s) else write (S); { 4 }3) if S<>5 THEN write (S+1) else write (S); { 3 }4) if S+1< 1 THEN write (SQR(S)) else write (S-1); { 1 }12. Выбрать правильную запись условного оператора: Если значение переменной К больше или равно 5, то присвоить переменной М значение, равное К/2 и вывести его на экран1) If K>=5 begin M:=K/2; write(K); end;2) If K>=5 Then begin M:=K/2; Write(K); End;3) If K>=5 then M:=K/2 and Writeln(K);13. Количество повторов, заданных оператором цикла For I:=0 to 15 Do Write (I); равно:1) 152) 163 )1414. Выбрать верный результат после выполнения фрагмента программы:For K:=1 to 3 Do Write (K:5);1) 6 7 82) 6783) 1 2 34) 35) 815. Какое значение примет переменная С после выполнения оператора цикла:С:=0; For I:=1 to 3 Do C:=C+I;1) 1362) 33) 64)4