Тест по информатике на тему Ветвление в Pascal

Автор публикации:

Дата публикации:

Краткое описание: ...


1. Какое из условий написано не правильно

1.2. 1+5

1.3. x>y and x>0

1.4. x<>y-1

2. Значение переменной z после выполнения программы:

x:=6; y:=4;z:=0;

if x mod y = 1then

if x-y div 2<>0 then z:=x-y

else z:=x+y;

write (z);

будет равно ________

3.var x,y,z,t :integer;

Begin

Readln (x,y,z);

If xz then t:=y

Else t:=z

Else if x

Else t:=z;

Write(t)

End.

3.1.Программа находит наименьшее из трех чисел

3.2.Программа находит наибольшее из трех чисел

3.3.нет верных

4. x:=4; y:=6;

If y div x> y mod x then write(‘Yes’)

Else write(‘No’);

Ответ будет ___________

5. x:=10;y:=5;

If (x div y) mod 2 = 0 then write(‘yes’)

Write(‘no’)

Ответ будет ___________

6. x:=8; y:=6;

If x mod 2=0 then Begin

If x mod y =0 then t:=x (1)

Else t:= y (2)

end

else

if x div y<>0 then t:=x (3)

else t:=y (4)

будет выполнена строка под номером __________

7. n:=582;

X:= n div 100;

Y:= n mod 10

Z:=n mod 100 div 10;

If y= z then write ………

Фрагмент программы сравнивает:

7.1. десятки и сотни

7.2. десятки и единицы

7.3.единицы и сотни

8. Какое условие нужно поставить чтобы был ответ ‘yes

X:=3; y:=8;

If then write(‘no’)

Else write(‘yes’)

1.1. x>y-2

1.2. x div y

1.3. (x>y) or (x>0)

1.4. x+y div x< y+y mod x

Ф.И.____________________ класс_________