Если 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.
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
