М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
ceneral
ceneral
13.05.2023 10:31 •  Информатика

Это убывание массива, переделайте в массив возрастания program rost; var n,i,j,x,imax: integer; a: array[1..10] of integer; begin for i: =1to 10do read(a[i]); for i: =1to 10 do write(a[i], ' ' ); for i: =1to 9do begin imin: =i; for j: =i+1to 10 do if a[j]> a[imax] then imax: =j; x: =a[i]; a[i]: =a[imax]; a[imax]: =x end; for i: =1to 10do write (a[i], ' ' ); end.

👇
Ответ:
Victoriahamidul
Victoriahamidul
13.05.2023
Program rost;
const n=10;
var i,j,x,imin:integer; 
a:array[1..n] of integer;
begin 
for i:=1 to n do read(a[i]); 
for i:=1 to n do write(a[i], ' ' );
writeln;
for i:=1 to n-1 do
begin 
 imin:=i; 
 for j:=i+1 to n do if a[j]<a[imin] then imin:=j;
 x:=a[i]; 
 a[i]:=a[imin];  a[imin]:=x 
end;
for i:=1 to n do write (a[i], ' ' );
writeln;
end.

Пример:
6 4 9 2 5 1 3 7 8 2
6 4 9 2 5 1 3 7 8 2 
1 2 2 3 4 5 6 7 8 9 
4,7(44 оценок)
Открыть все ответы
Ответ:
LIquid0Horse
LIquid0Horse
13.05.2023

Для создания пароля используются и прописные и строчные буквы латинского алфавита, поэтому общее количество символов используемых для пароля N=26+26= 52.

Определим количество бит i на 1 символ из формулы  N=2^i

Число должно быть целое и достаточное для кодирования 52 символов.   2⁵ < 52 < 2⁶  

получается на 1 символ приходится 6 бит

Для хранения 7 символов пароля необходимо: 6*7=42 бита.

По условию для хранения сведений о каждом пользователе отведено одинаковое и минимально возможное целое число байт.

Округляем информационный объем пароля в большую сторону до целого числа кратного 8, переводим в байты и прибавляем 12 байт дополнительных сведений:

48/8+12= 18 байт

Получаем, что 18 байт выделено для хранения информации об одном пользователе.

Тогда количество пользователей в системе:

2*1024/18=113,77

ответ: 113 пользователей.

Объяснение:

4,5(80 оценок)
Ответ:
mmmmmaaaaruuu69
mmmmmaaaaruuu69
13.05.2023

var

 a,c1,c2,s1,s2:integer;

begin

 readln(a);

 if a=0 then  

   begin

     writeln('Error');

     exit;

   end;

 s2:=-30000; c2:=30000;

 s1:=-30000; c1:=30000;

 repeat

   if (a>s1) or (a>s2) then

     if s1>s2 then

       s2:=a  

     else

       s1:=a;

   if (a<c1) or (a<c2) then

     if c1>c2 then

       c1:=a

     else

       c2:=a;

   readln(a);

 until a=0;

 writeln('max: ',s1+s2);

 writeln('min: ',c1+c2);

end.

Если моё решение вам, пометьте его лучшим !

4,4(74 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ