По правилу преобразования «В→Б, Б→А, ….» отгадайте, какое слово зашифровано, если исходное «слово» БВБЛ.

Знания

Информатика

1 ответ:

Т54й [52]4 года назад

0 0

Слово:
Абак

Б➡А
В➡Б
Б➡А
Л➡К

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

Дан массив, содержащий 2016 положительных целых чисел, не превышающих 1000. Необходимо найти и вывести максимальный из тех элеме

Bost

Const
    n = 2016;

var
    a: array[1..n] of integer;
    i, m, k: integer;

begin
    randomize;
    m := 1;
    for i := 1 to n do
    begin
        a[i] := random(1000);
        m := m * a[i] mod 2;
//        write(a[i], ' ');
    end;

    k := -1;
    for i := 1 to n do
        if (a[i] mod 2 = m) and (a[i] > k) then
            k := a[i];

    writeln(k);
end.

ответ примерно будет одинаковым, так как очень много цифр в массиве

0 0

4 года назад

Помогите пожалуйста!!!!! Очень срочно!!!!! В ячейках А1 В1 иС1 электронной таблицы хранятся числовые значения. В ячейку D1 занес

Занна

Можно использовать формулу:
=ЕСЛИ(ЕСЛИ(ЕЧЁТН(A1);1;0)+ЕСЛИ(ЕЧЁТН(B1);1;0)+ЕСЛИ(ЕЧЁТН(C1);1;0)=1;ИСТИНА;ЛОЖЬ)

0 0

4 года назад

Среди N случайных чисел в диапазоне от -1 до 10 определите количество чисел, делящихся на 3. паскаль срочно

aleshka13

Var
a,s,n,i:integer;
begin
s:=0;
readln(n);
for i:=1 to n do
begin
read(a);
if((a mod 3)=0) then s:=s+1;
end;
writeln(s);
end.

0 0

4 года назад

1) Составьте алгоритм, по которому на компьютере будет происходить следующее: в переменную S вводится возраст Саши, в переменную

rlv

в переменную S вводится возраст Саши ,
в переменную М вводится возраст Маши
если S > M тогда
выводим "Саша старше Маши "
иначе
если S < M тогда
выводим "Маша старше Саши"
иначе
выводим "Саша и Маша ровестники"

Так наверно?

0 0

4 года назад

Пароль называется криптостойким, если выполнены 4 критерия: Пароль содержит строчные латинские буквы Пароль содержит заглавные

Nelver [21]

<h3>PascalABC.NET 3.4.2, сборка 1843 от 24.10.2018</h3>

begin

var s := ReadString;

((s.Count(t -> t in ['a'..'z']) > 0 ? 1 : 0) + (s.Count(t -> t in ['A'..'Z']) > 0 ? 1 : 0) +

(s.Count(t -> t in ['0'..'9']) > 0 ? 1 : 0) + (s.Length >= 8 ? 1 : 0)).Println;

end.

0 0

4 года назад