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

Список a содержит натуральные числа. создать список b, который содержит только простые числа из a в порядке возрастания. список b сортировать методом простого выбора. вывести на печать список b или сообщить, что он пуст. напишите желательно на python.

👇
Ответ:
ждл1
ждл1
12.06.2020
Def is_prime(number):
for i in range(2,number):#здесь один TAB
if number%i==0: return False#здесь два TAB
return True#здесь один TAB

a=sorted([int(i) for i in input().split()])
b=list(filter(lambda i: is_prime(i),a))
print(b if len(b) else "b is empty")
4,4(10 оценок)
Открыть все ответы
Ответ:
sonyakaka332
sonyakaka332
12.06.2020
1) Как правильно и почему говрить: "Значение Интернета" или "Значение Интернет". (Интернет обычно не склоняется, но после указа Путина, что с Русским языком можно делать что угодно, и кофе стало женского рода - Интернет склоняем. Тоесть сейчас допустимы оба варианта)
2) Как можно заработать в сети Интернет? (Создать популярный сайт, бог или страничку и продовать на ней рекламные места...)
3) Интернет или бичь современного человека? (вопрос риторические.. можно годами его обсуждать)
4) Где находится Интернет? (Вопрос с подковыркой... Интернет - это связи. Он нигде не находитсмя, так же как нигде не находится "телефонный звонок"
5) С каких технологий осуществляется доступ в Интернет? (Приводить здесь ответ не буду - писать много)
6) Какие протоколы используются для доступа в Интернет?  (Приводить здесь ответ не буду - писать много)

7) Почему слово Интернет надо писать с большой буквы? (Потомучто это название одной из глобальных компьютерных сетей)
4,7(41 оценок)
Ответ:
nazar6082005
nazar6082005
12.06.2020
1.
var s,s1:string;
i:integer;
begin
readln(s);
s1:=s;
for i:=1 to length(s1) do begin
if s1[i]='а' then s1[i]:='б' else
 if s1[i]='А' then s1[i]:='Б' else
  if s1[i]='б' then s1[i]:='а' else
   if s1[i]='Б' then s1[i]:='А';
end;
writeln(s1);end.

2.
var s,s1:string;
i,k:integer;
begin
readln(s);
s1:=s; i:=1; k:=1;
while pos(' ',s1)>0 do begin
delete(s1,1,pos(' ',s1));
k:=k+1;
end;
writeln(k);
end.

3.
var s,famil,s1,imya,otch:string;
i:integer;
begin
readln(s);
famil:=copy(s,1,pos(' ',s)-1);
delete(s,1,pos(' ',s));
imya:=copy(s,1,1);
delete(s,1,pos(' ',s));
otch:=copy(s,1,1);
s1:=concat(imya,'.',' ',otch,'.',' ',famil);
writeln(s1); end.
4,8(89 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ