Информатика "Программирование разветвляющихся алгоритмов" 1. Написать программу,...

Question

Информатика "Программирование разветвляющихся алгоритмов"

1. Написать программу, определяющую, является ли произвольное число X четным.

2. Написать программу, определяющую, является ли целое число T делителем целого числа X.

3. Для произвольного числа A написать программу, возводящую его в квадрат, если число отрицательное, извлекающую из A квадратный корень, если положительное, оставляющее A без изменения, если A=0

Answer 1

if x%2==0 then

  print("chetnoe')

else print("ne chetnoe")

end

 

if x%t==0 then

  print("da')

else print("net")

end

 

if a < 0 then

  a=a*a

elseif a > 0 then

  a=math.sqrt(a)

end
print(a)