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

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

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

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

Question

Информатика

Тарасий

22 марта, 17:28

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

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

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

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

+3

Ответы (1)

Знаете ответ на вопрос?

Микола · 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)