Что такое ярлык выберите правильный ответ: 1)директория 2)перемещенный файл, папка или программа3)графическое изображение файла, папки или программы 4) копия файла, папки или программы? нужен правильный ответ
262
440
Ответы на вопрос:
Больше всего подходит 3)графическое изображение файла, папки или программы. 1) директория - зачем бы директорию называть еще и ярлыком? нет, конечно. 2) перемещенный файл, папка или программа - аналогично, это все равно файл, папка или программа. тоже нет.4) копия файла, папки или программы - и это не подходит. копия - это копия, причем тут какие-то ярлыки? а ярлык - специальный файл, в котором содержится путь к файлу или папке, а также некоторая дополнительная информация. внешне он отображается в виде иконки - графического элемента интерфейса операционной системы. ответ: 3)
Проверено, работает на паскаль авс: program rabota_s_massivom; uses crt; label metka; const n=30; var m: array[1..n] of integer; i,k,s,kmax,reserve: integer; begin for i: =1 to n do begin write('введите ',i,'-й элемент: '); readln(m[i]); end; writeln('массив: '); for i: =1 to n do begin write(m[i],' '); end; k: =1; {число элементов в текущей последовательности. изначально считаем, что последовательность состоит из одного (первого) элемента} {ищем первый нечётный элемент: } repeat reserve: =reserve+1; until (m[reserve] mod 2 = 1) or (reserve = 30); writeln(reserve); if (m[reserve] mod 2 = 0) and (reserve = 30) then begin writeln('все числа чётные. искомая последовательность не существует'); goto metka; end; s: =m[reserve]; {сумма элементов текущей последовательности пока что равна первому нечётному элементу} kmax: =0; {наибольшая длина последовательности} for i: =reserve+1 to n do {перебираем все элементы, начиная с первого нечётного} begin if (m[i] mod 2 = 1) then {если текущее число всё ещё нечетно} begin s: =s+m[i]; {увеличиваем сумму последовательности} k: =k+1 {увеличиваем счётчик длины последовательности} end else {если встретилось четное число} begin if k> kmax then {проверяем, не является ли полученная последовательность длиннее нашего максимума} begin {если да: } kmax: =k; {запоминаем новую длину последовательности} reserve: =s {запоминаем сумму её элементов} end; k: =0; {устанавливаем длину новой последовательности равной 0} s: =0 {сумма элементов этой последовательности тоже пока что = 0} end; end; if k> kmax then {если самая длинная последовательность находится в конце массива, проверим ещё раз текущий максимум} begin kmax: =k; reserve: =s end; writeln('самая длинная последовательность нечётных чисел состоит из ',kmax,' элементов'); writeln('и сумма этой последовательности равна ',reserve); metka: end.
Популярно: Информатика
-
барбаришкин29.07.2022 05:05
-
катя480208.09.2021 16:08
-
DIMAZVER198022.02.2023 09:53
-
Tania123610.05.2021 19:13
-
pwgamerproyt24.01.2021 08:27
-
Саня341113.08.2020 22:32
-
sowaties18.12.2020 19:48
-
Dufrenb04.10.2020 13:52
-
esmeraldadoctor01.05.2022 10:58
-
карина215329.12.2020 03:15