Найдите сумму 4+9++м^2 удвоив чётные слагаемыепаскаль - вопрос №9872706492 от catkama 05.11.2021 03:42

Question

Информатика: Найдите сумму 4+9++м^2 удвоив чётные слагаемыепаскаль через while doтема - циклические алгоритмы

catkama · Answer

Var a,b,c: longint; beginwhile a 0 dobeginread (a); if (a mod 2) thena: =a*2; c: =c+a; end; write(c); end....