Тест по Информатика – 4 януари 2010г.
Изробвайте своите умения тук и сега
1. Колко пъти ще се изпълни следващия цикъл и кое е последното отпечатано число:
For i:=3 downto 3 do
write(i)
2. Колко пъти ще се изпълни следващия цикъл и кое е последното отпечатано число:
for i:=1 to 5 do
for j:=i to i do
write(j);
3. Колко пъти най-малко ще се изпълни тялото на цикъл с постусловие:
4. Ако a=4, каква е стойността на b след изпълнението на оператора: if (a>4) then b:=5 else if (a<4) then b:=-5 else if (a=8) then b:=6 else b:=-6;
5. Дадено е цяло положително петцифрено число N. Кой от следните изрази връща стойността на цифрата на хилядните в числото:
6. Какво е предназначението на дадения оператор:
var n : integer;
. . . .
if n mod 2 <> 0 then write(‘Yes’)
else write(‘No)
7. При какви стойности на x, y и z изразът има стойност „истина”: not x and y and z or (x or not y and z)
8. Каква ще бъде стойността на променливата N при изпълнението на следния програмен фрагмент:
var M, N : integer;
. . . .
M := 0; N := 1;
if M>=0 then
if M=0 then N := -N else N := 0;
9. Посочете колко пъти ще се изпълни тялото на цикъла и каква ще бъде последната стойност на променливата М:
i:=10; repeat if i mod 3=0 then write(i); i:=i-2 until i<1;
10. Ако x=1, каква е стойността на y след изпълнението на оператора: If x<-5 then y:=1 else if x<0 then y:=2 else if x<5 then If x>2 then y:=3 else y:=4;