30 БАЛЛОВ!!!!!!!!
1. Составьте логическое условие, которое истинно только тогда, когда данное число-натуральное.
2. Составьте логическое условие, которое истинно только тогда, когда из трех введенных чисел хотя бы одно четное и хотя бы одно-нечетное.
3. Составьте логическое условие, которое истинно только тогда,когда хотя бы одно из трех чисел больше нуля.
4. Дана последовательность целых чисел a, b, с. Найдите разность между максимальным и минимальным значениями.

1. if (a>0) then ...2. Если честно, не знаю как правильно реализовать3. if (a>0) or (b>0) or (c>0) then...4. if (a>b) and (b>c) then d:=a+cif (a>b) and (c>b) and (a>c) then d:=a+bif (b>a) and (a>c) then d:=b+cВроде так, но все равно проверь))