profile
Опубликовано 6 лет назад по предмету Информатика от Аккаунт удален

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

  1. Ответ
    Ответ дан Yegor55

    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.

Самые новые вопросы