Напишите алгоритмы решения задач на языке программирования на Pascal

130

253

Посмотреть ответы 1

Ответы на вопрос:

raviole1983oyfuky

Информатика

4,5(67 оценок)

// pascalabc.net 3.2, сборка 1407 от 18.03.2017 // внимание! если программа не работает, обновите версию! begin var a,b: integer; write('введите a и b: '); read(a,b); if a.iseven then a+=1; writeln(range(a,b,2).aggregate(biginteger(,n)-> m*n)) end. пример введите a и b: 8 150 580554122049849093827527200003507344139941951124024707479403873680711622959632935925467423493256663987453900243591243743896484375