Question

Запишите на языке Pascal следующие условия:
x не кратно 7
-3 < x < 2
x Є [-3; 4]
x кратно 7
x оканчивается на 6
x - двухзначное число
x - чётное число

СРОЧНО

Answer 1

Ответ:

if (x mod 7 <> 0)

if (x > -3) and (x < 2)

if (x >= -3) and (x <= 4)

if (x mod 7 = 0)

if (x mod 10 = 6)

if (x mod 10 = 6)

if (x.ToString().Lenght = 2) или if (x > 9) and (x < 100)

if (x mod 2 = 0)