воскресенье, 29 января 2023 г.

Домашняя работа на 31.01 -3 февраля ВЫПИСАТЬ в тетрадь и выучить условия

 1простое условие (a>b)
2.       составное условие  (a>0) and (a<10)

3.       если а больше 21 тогда у увеличить а в 2 раза иначе уменьшить на 2
if a>21 then a:= a*2    else a:= a-2;   

4.       если а положительное, тогда у увеличить а в 3 раза иначе уменьшить на 3
if a>0  then a:= a*3    else a:= a-3  ; 

5.       если а отрицательное, тогда у сделать равным 7, иначе уменьшить на 7
if a<0  then a:= 7    else a:= a-7  ; 

6.       если а четное, написать слово четное, иначе уменьшить на 7
if a mod 2=0  then write(‘четное’)   else a:= a-7  ; 

7.       если а нечетное, то написать слово нечетное, иначе  написать слово четное
if a mod 2=1 if a mod 2=0  then write(‘нечетное’)   else write(‘четное’)  ; 

В номерах 8-10 дано только условие, остальное придумать самим
8.       если а кратно 7
if a  mod 7=0

9.      если а   положительное и b четное
if (a>0) and  (b mod 2=0)

10.    если а или b положительное
if (a>0) or (b>0)