Помогите решать надо через pascalABC.Net
// PascalABC.NET 3.3, сборка 1611 от 06.01.2018 // Внимание! Если программа не работает, обновите версию! begin Writeln(4*4*ReadInteger('x =') + 4*4); end. Пример: x = 1 32 (А вообще ответ всегда "0", потому что у кошек лапки <(^_^)>)