PascalABC.NET 3.3.5, сборка 1660 от 20.04.2018 Внимание! Если программа не работает, обновите версию!
begin var a:=ArrRandom(49,-50,50); a.Println; Writeln('Сумма равна ',a.Sum); if not a.Any(t->t=0) then Writeln('Произведение равно ', a.Aggregate(BigInteger(1),(p,q)->p*q)) end.
Исполнитель Калькулятор.1.Степень(число,степень)2.Корень(число,степень)3.Сложение(число,число2)4.Умножение(число,число2)5.Деление(число,число2)6.Вычитание(число,число2)7.Вывод(алг)-выводит результат алгоритма8.Если(условие)9.скобка1 скобка2-для содержания операторов в условииначало конец - для содержания всего алгоритма10.Ошибка - сообщает об ошибке и прекращает выполнение алгоритма11.Ввод(x)-считывает числа, введённые пользователем Пример: Найти квадратный корень из числа 9 НачалоКорень(9,2)Вывод(алг)Конец Пример: Разделить 7 на x НачалоВвод(x);Если(x=0)скобка1Ошибкаскобка2Деление(7,x)Вывод(алг)Конец Пример: Возвести х в степень у НачалоВвод(х,у)Степень(х,у)Вывод(алг)Конец Калькулятор находит сумму, разность, произведение, частное, возводит в степень или извлекает корень согласно введённым пользователем данным, либо заданным по умолчанию.
Python
Объяснение:
for i in range(35,165): # создаем цикл в котором будем переберать цифры от 35 до 164, 165 потому что начинается отсчет от 0
if i%2 == 0: # оператор % дает остаток от деления первого аргумента на второй, то есть остаток при делении четных чисел на 2 будет равен 0
print(i) # выводим цифры которые нам подходят