SuperArtem52
26.02.2023 15:02

Назначение 1. У Айгуль 10 строк на каждой странице по 40 знаков в каждой, всего 50 страниц.
читать книгу. Решение не соответствует количеству информации в книге
найти.
а) 2000 байт
б) 20000 байт
в) 19.5 Кб
г) 160 000 бит
2. Сообщение Баглана своему другу написано 16-символьным алфавитом.
Состоит из 14 персонажей. Сообщение Мардана состоит из 64 символов.
В алфавите использовалось 12 символов. Баглан написал больше всего информации?
Мардан писал? Найти решение.
если больше
3. Вставьте соответствующие слова в отведенное место.
а) Микросхемы процессора
Чем выше частота, тем быстрее обрабатывается информация.
б) Обратите внимание на количество, чтобы купить высокопроизводительный ноутбук
мы переводим.
в) Практически все, что делает компьютер
пьесы.
г) Быстро записать и временно сохранить необходимую информацию
разрешающее устройство
называется.
4. Задайте 850 байт файла со скоростью 100 бит / с за 1 минуту ты можешь скачать
!

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
GayaneshkaBrainly
29.12.2020 12:26

var

  a : array [1..9] integer;

  i : integer;

begin

  for i := 1 to 9 do

    if i mod 3 = 1 then a[i] := i

    else if i mod 3 = 2 then a[i] := sqr (i - 1)

    else a[i] := a[i - 1] div i;

  for i := 1 to 9 do

    write (a[i], ' ');

end.

 

var

  b, a : array [1..15] of integer;

  i, sa, sb : integer;

begin

  randomize;

  sa := 0; sb := 0;

  for i := 1 to 15 do

  begin

    a[i] := trunc (random (100)) + 1;

    write (a[i], ' ');

    sa := sa + a[i];

  end;

  writeln;

  for i := 1 to 15 do

  begin

    b[i] := sqr (a[i]) - a[i]);

    write (b[i], ' ');

    sb := sb + b[i];

  end;

  writeln;

  writeln (abs (sb - sa));

end.

  

0,0(0 оценок)
Ответ:
temik2005ap08ttx
16.11.2022 00:30
Program gt2;
var i,j,s:integer;
a:array[1..4,1..4]of integer;
begin
randomize;
for i:=1 to 4 do
for j:=1 to 4 do
a[i,j]:=random(7)+12;
for i:=1 to 4 do
begin
s:=0;
for j:=1 to 4 do
s:=s+a[j,i];
writeln(s);
end;
end.

program gt3;
var i,j,s:integer;
a:array[1..7,1..7]of integer;
begin
randomize;
for i:=1 to 7 do
for j:=1 to 7 do
a[i,j]:=random(7)+12;
for i:=1 to 7 do
begin
s:=0;
for j:=1 to 7 do
if(a[j,i]<14)then s:=s+1;
writeln(s);
end;
end.

program gt4;
var i,j,p:integer;
a:array[1..3,1..3]of integer;
begin
for i:=1 to 3 do
for j:=1 to 3 do
read(a[i,j]);
for i:=1 to 3 do
begin
p:=a[i,1];
a[i,1]:=a[i,2];
a[i,2]:=p;
end;
for i:=1 to 3 do
begin
for j:=1 to 3 do
begin
write(a[i,j],' ');
end;
writeln;
end;
end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота