Декодирование сообщений это?

Знания

Информатика

1 ответ:

lvxjn [14]4 года назад

0 0

Декодировать сообщения это - расшифровывать сообщение которое было передано какими-либо условными знаками или кодами.

Читайте также

Найти и напечатать u = min{x+y, xy}

GotFor228

Var x,y,u:real;
function min(a,b:real):real;
begin
if a>b then min:=b else min:=a;
end;
begin
write('x=');read(x);
write('y=');read(y);
u:=min(x+y,x*y);
writeln(u);
<span>end.</span>

0 0

3 года назад

Определите, что будет напечатано в результате работы следующего фрагмента программы:var n, s: integer;beginn := 4;s := 0;while n

Micsi

Вроде всё элементарно... Будет 30.

0 0

3 года назад

Прочитать ещё 2 ответа

Помогите пожалуйста ! составить много слов со словом Клавиатура СРОЧНО

Анастасия Борисовна

Лава
авиа
тур
турка
вал
рука
вика

0 0

4 года назад

Каким должно быть сообщение, чтобы оно пополнило ваши знания?

Дмитрий Сиделко

Информативным, полезным, и информация должна быть мне еще не известная.

0 0

4 года назад

Напишите программу которая заполняет матрицу размером 7х7 случайными числами, а затем записывает в элементы отмеченные на рисунк

Виолетта1408

Const
   N = 7;
Var
   A:array[1..N,1..N] of integer;
   i,j:integer;
Begin
For i:= 1 to N do
    Begin
    For j:= 1 to N do
        Begin
        A[i,j]:=random(21)-10;
        Write(A[i,j]:3,' ')
        End;
    WriteLn
    End;
WriteLn;
For i:= 1 to N div 2+(N mod 2) do
    Begin
    For j:= 1 to N do
        Begin
        if (j<=N div 2+i)and(N div 2-i+(N mod 2)<j) then A[i,j]:=99;
        Write(A[i,j]:3,' ')
        End;
    WriteLn;
    End;
For i:= (N div 2)+(N mod 2)+1 to N do
    Begin
    For j:= 1 to N do
        Begin
        if (i-N div 2-1<j)and(j<=N+N div 2+1-i) then A[i,j]:=99;
        Write(A[i,j]:3,' ')
        End;
    WriteLn;
    End;
End.

0 0

4 года назад

Прочитать ещё 2 ответа