Как люди защищали информацию в ?

Question

Информатика: Как люди защищали информацию в ? ​

Мэри6669 · Accepted Answer

//1 var A, B, i: integer; begin   write( Введите A и B: ); readln(A, B);   for i := A to B do     if ((i mod 3 = 0) and (i mod 10 = 3)) then writeln(i); end. //2 var   A, B, i, k: integer; begin   write( Введите A и B: ); readln(A, B);   for i := A to B do     if ((i 99) and (i 1000)) and ((i mod 10 = 9) and (i mod 100 99)) then     begin       writeln(i);       k := k + 1;     end;     if k = 0 then writeln( Таких чисел нет. ); end. //3 var sum, i, n: integer; begin   write( Введите количество...

Как люди защищали информацию в ? ​

MOGZ ответил