Есть ответ 👍

Расположите в порядке возрастания следующие величины, указывая в ответе их буквенные обозначения: а) 33 бита б) 4 бита в) 4001 кбайт г) 4 мбайт д) 12298 гбайт е) 12 тбайт

277
422
Посмотреть ответы 2

Ответы на вопрос:


Б) а) г) в) е) д) и наоборот, если нужно в порядке уменьшения

//pascalabc.net 3.2 сборка 1318 //очередное решение "в лоб" var   n,i,j,max: integer;   s,curr: string;   b: boolean=false; begin readln(n); max: =-1; s: =inttostr(n); for i: =1 to length(s) do   begin     curr: ='';     for j: =i downto 1 do       begin         curr: =s[j]+curr;         if frac(sqrt(strtoint(=0 then           begin             b: =true;             if sqrt(strtoint(curr))> max then max: =round(sqrt(strtoint(;           end;       end;   end; if b then writeln(max) else writeln('0'); end. пример ввода 1: 164 пример вывода 1: 8 пример ввода 2: 523 пример вывода 2: 0

Популярно: Информатика