В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
dariaAppp
dariaAppp
07.11.2021 00:35 •  Информатика

училка сама сделала тетрадь не где не списать на вас надежда


училка сама сделала тетрадь не где не списать на вас надежда

Показать ответ
Ответ:
vladbortnovsij69
vladbortnovsij69
14.08.2021 05:16

1. Браузер - прикладное программное обеспечение для просмотра страниц, содержания веб-документов, компьютерных файлов и их каталогов.

2. Он нужен для для просмотра страниц, содержания веб-документов, компьютерных файлов и т.д

3. При установлении операционной систему, по умолчанию устанавливается браузер. Пример: Windows - Enternet Explorer

1) Заходим в браузер который установлен по умолчанию.

2) Пишем в поисковую строку название браузера который хотите установить.

3) Заходим на официальный сайт разработчика браузера.

4) Скачиваем сам браузер и устанавливаем его. Все браузер установился.

4. Пароль должен содержать заглавные и строчные буквы, цифры, пробелы и специальные символы.  А также пароль должен быть больше 8 символов.

0,0(0 оценок)
Ответ:
DarKerThanBlaCK34
DarKerThanBlaCK34
29.05.2020 03:32

Программа:

{Free Pascal Compiler version 3.0.4+dfsg-23 [2019/11/25] for x86_64}

{Copyright (c) 1993-2017 by Florian Klaempfl and others}

{Target OS: Linux for x86-64}

program test;

Uses Math;

   var

       A : array of integer;

       N, S, i : integer;

begin

   Randomize;

   S := 0;

   write('Укажите длину последовательности: ');

   Readln(N);

   {Генерация и печать массива}

   SetLength(A, N);

   for i := 1 to N do begin

       A[i] := Random(50);

       write(A[i], ' ');

       end;

   writeln; writeln('------------------------------');

   for i := 1 to N do

       {Определение кратности элемента массива числу 5}

       if A[i] mod 5 = 0 then begin

           {Вывод на экран этого числа}

           write(A[i], ' ');

           {Подсчет суммы чисел}

           S := S + A[i];

           end;

   writeln;

   {Вывод на экран суммы}

   writeln('Сумма - ', S);

end.

Объяснение:

Программа просит ввести пользователя число, длину генерируемой последовательности. Затем создается массив нужной длины, заполняется значениями от 0 до 50. Затем во втором цикле просматривается каждый элемент массива, - если он кратен 5, то число выводится на экран и суммируется.

В конце программа выводит итоговую сумму найденных элементов.

Результат выполнения программы:


Дана последовательность из n-целых чисел. Найти сумму всех чисел кратных 5. На языке Паскаль​
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота