Найдите сумму 4+9++м^2 удвоив чётные слагаемыепаскаль - вопрос №9872706492 от svetlana6712 16.06.2021 23:29

Question

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

svetlana6712 · 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....