Var n, m, sum: integer; begin sum : = 0; repeat writeln('введите числ с которого начинается ряд'); readln(n); writeln('введите число которым заканчивается ряд'); readln(m); until n< m; if odd(n) then n : = n + 1; if odd(m) then m : = m - 1; sum : = (n + m) * (m - n + 2) div 4; writeln('сумма чётных чисел натурального ряда: ', sum); end.
o-pavlova-8635
06.10.2020
профессия на открытом воздухе в помещениях в небольших в небольших замкнутых условиях пространство. труда
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Какой из перечисленных языков программирования относится к “низкоуровневым”? а) c++ б) java в) python г)assembler