Если 2^m больше чем 2m,то m увеличить в 10 раз. в противном случае m уменьшить в 2 раза. блок схема и паскаль

Если 2^m больше чем 2m,то m увеличить в 10 раз. в противном случае m уменьшить в 2 раза. блок схема и паскаль
Гость
Ответ(ы) на вопрос:
Гость
var m: Integer; begin Write('Введите m: '); Readln( m ); if sqr(m) > 2*m then m := m*10 else m := m div 2; Write( m ); Readln; end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы