Страница 101-107 §2.4 номер 8, ГДЗ по информатике за 9 класс к учебнику Босовой

Информатика 9 класс 9класс ГДЗ к учебнику по информатике за 9 класс Босовой. Решения к номерам

Ответ и решение

program z_8;var x, n, i: integer; s: longint;//тип длинная целаяfunction deg(a, b: integer): longint;var j: integer; z: longint;begin z := 1; for j := 1 to b do z := z * a; deg := zend;begin write('введи числа>>'); readln(x, n); s := 0; i := 3; while i <= n do begin s := s + deg(x, i); i := i + 2; end; writeln('S=', s)end.