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

Как называется коммуникационное устройство, соединяющее несколько сетей в одну и осуществляет обмен данными между ними. як називається комунікаційний пристрій, що з'єднує кілька мереж в одну та здійснює обмін данним між ними

👇
Ответ:
supanzerbe
supanzerbe
09.11.2022
Маршрутизатор  или  коммутатор
4,5(17 оценок)
Открыть все ответы
Ответ:
juanabakar
juanabakar
09.11.2022

~ это пробелы.

1)

for i in range(1,10+1): //цикл от 1 до 10 включительно

print(i)

2)

for i in range(10,0,-1): //цикл от 10 до 1 включительно

print(i)

3)

for i in range(2,10+1): //цикл от 2 до 10 включительно

if i%2==0:

print(i)

4)

for i in range(1,16+1): //цикл от 1 до 16 включительно

if i%2==1:

print(i)

5)

summ=0 //переменная для хранения суммы

for i in range(1,50+1): //цикл от 1 до 50 включительно

summ+=i

print(summ)

6)

n=int(input())

summ=0

for i in range(1,n+1): //цикл от 1 до n включительно

summ+=i

print(summ)

7)

//не знаю как циклом, но вот проще

print(len(input()))

8)

n=int(input())

for i in range(len(str(n))):

print(n%10)

n//=10

Всё. Можно лучший ответ?

4,8(14 оценок)
Ответ:
Wow01
Wow01
09.11.2022
// PascalABC.NET 3.3, сборка 1547 от 07.10.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var (a,b):=ReadReal2('Введите через пробел a,b:');
  Writeln(a,' + ',b,' = ',a+b);
  Writeln(a,' - ',b,' = ',a-b);
  Writeln(a,' * ',b,' = ',a*b);
end.

Пример
Введите через пробел a,b: -3.6 2.15
-3.6 + 2.15 = -1.45
-3.6 - 2.15 = -5.75
-3.6 * 2.15 = -7.74

begin
  var n:=ReadInteger('n=');
  var a:=ReadReal('a=');
  var p:=1/a;
  var s:=p;
  for var i:=1 to n do begin p/=(a+i); s+=p end;
  Writeln(s)
end.

Пример
n= 6
a= 2.4
0.57315329840095

begin
  var n:=ReadInteger('n=');
  var s:=ReadSeqReal('Введите '+n+' чисел:',n).Select(x->Abs(x)).Sum;
  Writeln('Сумма модулей равна ',s)
end.

Пример
n= 6
Введите 6 чисел: -4.35 2.63 11 -8.1 0 -6.4
Сумма модулей равна 32.48
4,7(41 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ