“Zamonaviy dasturlash tili” fanidan 4-kurs talabalari uchun testlar to’plami

To’g’ri javoblar * bilan belgilangan

1. x= 2006 da x:=strtoint(edit1.Text); if odd(x) then output1.caption:=’toq’ ; buyruq natijasini aniqlang.
toq
2006
juft
* Xech qanday javob yo‘q

2. x-ning juft qiymatlarida buyruq natijasini aniqlang x:=strtoint(edit1.Text); if odd(x) then output1.caption:=inttostr(2005+2006);
tok
* xech qanday javob yo‘q
2006
4011