М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
pepper5566776
pepper5566776
07.09.2022 17:22 •  Информатика

Сформировать условие запроса к бд «подписка», при выполнении которого на экран будут выведены сведения о подписчиках соколове, федорове и яковлеве (в условии запроса не должно использоваться поле «фамилия»). p.s. базы данных изначально нет. , , буду : d

👇
Ответ:
Анель1342
Анель1342
07.09.2022
Например таблица Subscription (Подписка). Поля id , lastname, sex ( идентификатор, фамилия, пол). Допустим там будут не только мужчины подписчики, но и женщины. Нам нужны мужчины. Select * from Subscription where sex = 1
4,5(40 оценок)
Открыть все ответы
Ответ:
nastosetrova1
nastosetrova1
07.09.2022
Программа шифровки:
DATA "ауоыэяюёие"
DATA "бвгджзклмнпрстфхцчшщ"
DATA "ъйь"
DIM s10 AS STRING, s20 AS STRING, s3 AS STRING
DIM i AS INTEGER
DIM s AS STRING, t AS STRING
CLS
READ s10, s20, s3
RANDOMIZE TIMER
INPUT "Введите фразу: ", s
t = ""
FOR i = 1 TO LEN(s)
   t = t + MID$(s, i, 1)
   t = t + MID$(s10, INT(10 * RND + 1), 1)
   t = t + MID$(s20, INT(20 * RND + 1), 1)
   t = t + MID$(s3, INT(3 * RND + 1), 1)
NEXT i
PRINT t
END

Программа дешифровки:
DIM s AS STRING, t AS STRING, i AS INTEGER
CLS
INPUT "Введите фразу: ", s
t = ""
FOR i = 1 TO LEN(s) STEP 4
   t = t + MID$(s, i, 1)
NEXT i
PRINT t
END
4,7(92 оценок)
Ответ:
didar6
didar6
07.09.2022
234567891011121314151617181920212223procedure CountingSort(var X: array of integer; min, max: integer);var counter: array[0..100000] of integer; i, j, index: Integer;begin // для всех элементов массива // указываем значение ноль for i:=0 to high(counter)  do tmpX[i]:=0; for i:=min to max  do counter[ar[i]]:=counter[ar[i]]+1; // устанавливаем значение // в правильную позицию index:=min; for i:=min to high(counter)-1 do  begin   for j:=0 to counter[i]-1 do    begin     ar[index]:=i;     index:=index+1;    end;  end;end;
4,8(27 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ