Тест на тему "Величини логічного типу. Алгоритми з розгалуженнями."
- A : Boolean
- beginX := 10
- Y := 12
- Z := 30
- A := (X <
- Y) аnd (Y <
- Z) аnd (Z mod Y = 0)
- Edit1.Text := BoolToStr(A,False)
Натисни на цю кнопку щоб побачити правильну відповідь
Правильна відповідь виділена іншим кольором.
Якщо правильних відповідей декілька, то всі вони будуть виділені іншим кольором.
-
- A : Boolean
- beginX := 10
- Y := 12
- Z := 30
- A := (X <
- Y) аnd (Y <
- Z) аnd (Z mod Y = 0)
- Edit1.Text := BoolToStr(A,False)