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