1)составить программу нахождения наибольшего общего делителя нод. составить блок-схему 2)составить программу решения примера 1+2+4+6+8..

114

461

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

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

sonya76557

Информатика

4,7(51 оценок)

Program pr1; var x,y, nod: integer; begin readln(x,y); repeat if x > y then x: =x mod y else y: =y mod x until x*y=0; nod: =x+y; writeln('нод=', nod); end.program pr2; var i,n,sum: integer; beginreadln(n); sum: =1; for i: =1 to n doif i mod 2 = 0 then inc(sum,i); writeln(sum); end.