Среди ниже чисел найдите 2 числа обозначающих один и тот же объем информации 1024 кбайт , 2 бит , 16 байт , 32 бит
Ответы
Программа:
Pascal:
№1)
var arr: array[1..10] of integer;
begin
for var i := 1 to 10 do arr[i] := random(100);
writeln(arr);
end.
№2)
const N = 15;
var arr: array[1..N] of integer;
i, tmp: integer;
begin
for i := 1 to 15 do arr[i] := random(100);
writeln(arr);
for i:=1 to n div 2 do begin
tmp := arr[i];
arr[i] := arr[N - i + 1];
arr[N - i + 1]:= tmp;
end;
writeln(arr);
end.
№3)
const N = 20;
var
arr: array[1..N] of integer;
i, tmp, j: integer;
begin
for i := 1 to N do readln(arr[i]);
writeln(arr);
for i := 1 to N - 1 do
for j := 1 to N - i do
if (arr[j] > arr[j+1]) then begin
tmp := arr[j];
arr[j] := arr[j+1];
arr[j+1] := tmp;
end;
writeln(arr);
end.
<body>
<p>
<font color="blue"> Декабрь, январь, и февраль – зимние месяцы.</font>
</p>
<p>
<font color="green"> Март, апрель и май – весенние месяцы. </font>
</p>
<p>
<font color="yelow"> Июнь, июль и август – летние месяцы. </font>
</p>
<p>
<font color="orange"> Сентябрь, октябрь, ноябрь – осенние месяцы. </font>
</p>
Объяснение:
<font color="..."> Вместо троиточия код цвета можешь поставить </font>
<p>Это абзац</p>
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Популярные вопросы в разделе
по информатике сор 2 четверть 7класс
отправьте как сделать. Мне очень Буду очень благодарна.
