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

15 ♥♥♥ что такое интернет? что означает слово провайдер ? что такое электронная почта ? в чём заключается функция браузера? какие браузеры вы знаете? какие опасности могут возникнуть при использовании сети интернет? что такое плагиат? ​

👇
Ответ:
oobostoo
oobostoo
15.11.2021
Интерне всемирная система объединённых компьютерных сетей для хранения, обработки информации
4,5(17 оценок)
Ответ:
999997675656
999997675656
15.11.2021

1) Что такое интернет?  —Всемирная система объединённых компьютерных сетей для хранения, обработки и передачи информации.

2) Что означает слово провайдер?

Компания, поставщик каких-либо услуг.

3) Что такое электронная почта?

Технология и служба по пересылке и получению электронных сообщений (называемых «письма», «электронные письма» или «сообщения») между пользователями компьютерной сети (в том числе — Интернета).

4) В чем заключается функция браузера?

Главная функция браузера – это открытие веб-страниц сайтов.

4,8(66 оценок)
Открыть все ответы
Ответ:
Руфина157
Руфина157
15.11.2021
// PascalABC.NET 3.3, сборка 1627 от 27.01.2018
// Внимание! Если программа не работает, обновите версию!

procedure BubbleSortFlag(a:array of integer);
// пузврьковая сортировка с флажком
begin
  var f:=True; // флажок перестановки
  var p:=1; // номер перестановки
  var n:=a.Length;
  while f do begin
    f:=false;
    for var i:=0 To n-p-1 Do
      if a[i]>a[i+1] then begin
        Swap(a[i],a[i+1]);
        f:=true
        end;
      p+=1
    end
end;

begin
  var a:=ArrRandom(10,-10,10); a.Println;
  BubbleSortFlag(a);
  a.Println
end.

Пример
-7 5 5 1 -3 -5 -8 1 2 3
-8 -7 -5 -3 1 1 2 3 5 5
4,7(37 оценок)
Ответ:
Zxcvbnm1412
Zxcvbnm1412
15.11.2021

1)

var

A,s: integer;

begin

 writeln ('Ведите А: ');

 readln(A);

 if A>30000 then

   begin

   writeln ('Ошибка. А больше 30000');

   end

 else

   begin

   s := 0;

 while a > 0 do

 begin

   s := s + A mod 10;

   A := A div 10;

 end;

 writeln(s);

 end;

end.

2)

var

C,index,i: integer;

begin

 writeln ('Ведите C: ');

 readln(C);

 if C>30000 then

   begin

   writeln ('Ошибка. C больше 30000');

   end

 else

   begin

   for i:=0 to C do begin

     if(i mod 2) = 0 then

       else begin

         index:=index+1;

         end

     

     end

 end;

 writeln (index);

end.

4,7(7 оценок)
Новые ответы от MOGZ: Информатика
Полный доступ к MOGZ
Живи умнее Безлимитный доступ к MOGZ Оформи подписку
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ