1) Недостающие фрагменты:
var a, b, p
Readln(a);
Readln(b);
2) Блок-схема:
(начало)
|
/ a, b /
|
[ y = 3*a^3 - 2*b^2 + 5*a*b ]
|
/ y /
|
(конец)
Программа:
П1 <-> П0 3 <-> x^y 3 * ИП1 x^2 2 * - ИП0 ИП1 5 * * + С/П
MAX (8) = 7777 (8)
7777 (8) -> X (2)
X = 111 111 111 111 (2)
Оставим только 4 единицы:
111 100 000 000 (2)
Переводим обратно в (8):
7400 (8)
Ответ: 7400