Question

Дан программный код: program my3; var N:longint; A,С:integer; begin writeln ('введите двузначное число:'); readln(N); A:= N div 100; C:= N mod 10; if (A=7) or (C=7) then N:= N*N; write(N); end. Каков результат работы программы при введении исходного числа N=17?

Answer 1

Не можно было просто переписать код в паскаль?