Тест на тему "Розгалуження в Turbo Pascal"
- if x mod 2=1 then write('x - ', 'парне число')
- if x div 2=0 then write('x - ', 'парне число')
- if x mod 2=0 then write('x - ', 'парне число')
- if x div 2=1 then write('x - ', 'парне число')
Натисни на цю кнопку щоб побачити правильну відповідь
Правильна відповідь виділена іншим кольором.
Якщо правильних відповідей декілька, то всі вони будуть виділені іншим кольором.
-
- if x mod 2=1 then write('x - ', 'парне число')
- if x div 2=0 then write('x - ', 'парне число')
- if x mod 2=0 then write('x - ', 'парне число')
- if x div 2=1 then write('x - ', 'парне число')