Составить простую программу в Паскаль 1.Дано число, если оно четное то возвести в квадрат, если нет то возвести в куб. 2. Вводится 4 числа, проверить равны ли они если да то суммировать их, если нет то ничего не выводить.
Answers & Comments
373050026
Вот решение!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
3 votes Thanks 3
romchig1
1.if (a mod 2)=o then write(a*a) else write(a*a*a);
Answers & Comments
else write(a*a*a);