Определите является ли целое число а четным если да возведите его в квадрат если нет то в куб составьте блок схему помогите пож отдаю 25 баллов
помогитеее пожалуйста очень сроочнооо
//PascalABC.Net 3.2 begin var a:=readinteger('Введите a: '); if a.IsEven then write (sqr(a)) else write (a*a*a); end.
спасибо но можно по русски
и еще числа не надо вставлять ?