Главная » Файлы » Для вчителя » Інформатика | [ Добавить материал ] |
[ · Скачать удаленно (109 Kb) ] | 19.07.2010, 20:01 |
Bapiaнт 1 1. Вкажіть операції відношення: 1) >; 2) And; 3) =; 4) >=; 5) Not; 6) Xor; 7) =<; 8) Or; 9) ><. 2. Вкажіть неправильно записані операції відношення: var a, b: Integer; 1) a>b; 2) a=>b; 3) a> 4) a>>b; 5) a=b; 6) a< 7) a<=b. 3. Вкажіть правильно записані операції відношення: var a, b, c: Real; 1) a*a=b + c; 2) 0 3) sqrt(a)>c; 4) a+b+c 5) 5*a 6) sqr(a)>b. 4. Вкажіть правильно сформовані логічні вирази, якщо var a, b, c: Integer; d: Boolean; 1) a=b=c; 2) Not d And(b>c); 3) (a>b) or d; 4) а=b or a=c; 5) d аnd Not(a+b>c); 6) d аnd(a=c). 5. Вкажіть послідовність дій при виконанні умовного оператора if логічний вираз then оператор 1 else оператор 2; 1) виконується оператор 1; 2) обчислюється логічний вираз; 3) виконується оператор 2, потім оператор 1; 4) якщо результат логічного виразу TRUE, то ...; 5) виконується оператор 2; 6) якщо результат логічного виразу FALSE, то ...; 7) виконується оператор 1, потім оператор 2; 8) не виконується жоден з операторів. 6. Неповна форма умовного оператора записується так: 1) Case <вираз> of <варіант 1>: <оператор 1>; ... end;; 2) if <логічний вираз> then <оператор 1> else <оператор 2>;; 3) if <логічний вираз> then <оператор>;; 4) case <вираз> of ... else <оператор> end;. 7. При виконанні умови a < b, де a, b — змінні дійсного типу, потрібно цим змінним присвоїти квадрати їхніх значень. Вкажіть правильно сформований запис: 1) if a 2) if a 3) if a 4) if a 5) if a 6) if a 8. При виконанні таких дій a:=50; if a>10 then if a<40 then WriteLn(a) else WriteLn(–a); нa екані дисплея буде виведено число: 1) 50; 2) –50; 3) нe буде виведено нічого. 9. Вкажіть істинне відношення при виконанні умови «ціле число k кратне 7»: 1) k mod 7 = 0;; 2) k mod 7 < 1;; 3) k mod 7 <> 0;; 4) k div 7 <> 0;; 5) not (k mod 7 <> 0) ;; 6) k div 7 = 0;; 7) k mod 7 >< 0;. 10. Вкажіть відповідність між логічними виразами та їх описами: 11. Вкажіть номери рядків програми, які містять помилку: 1) var a,b,c:Real; 2) begin 3) ReadLn(a,b,c); 4) if a 5) then WriteLn(a) 6) else WriteLn(b); 7) end Варіант 2 | |
Просмотров: 429 | Загрузок: 114 | |