anna-ditman
?>

Учитель работал в каталоге d: \материалы к урокам\10 класс\практические работы. затем перешел в дереве каталогов на уровень выше, спустился в подкаталог лекции и удалил из него файл введение. каково полное имя файла, который удалил преподаватель? выберите один ответ: d: \материалы к урокам\лекции\введение d: \материалы к урокам\введение\лекцииd: \материалы к урокам\10 класс\лекции\введение d: \материалы к урокам\10 класс\введение определите, по какой из масок будет выбрана указанная группа файлов make.cpp, name.c, age.pc, name.cpp выберите один ответ: a? e.* ? a? e.* *a*e.? *a? e.*

Информатика

Ответы

irinasolodova3
D:\Материалы к урокам\10 класс\Практические работы
перешел выше, значит D:\Материалы к урокам\10 класс
спустился в D:\Материалы к урокам\10 класс\Лекции
удалил файл "введение", значит полное имя файла D:\Материалы к урокам\10 класс\Лекции\введение.

*a*e.?
*a?e.*
hobpack
// PascalABC.NET 3.1, сборка 1171 от 15.02.2016
begin
  var i,j:integer;
  var n:=ReadInteger('n=');
  var a:=ArrRandom(n,10,99); a.Println;
  var imax:=0;
  var imin:=0;
  for i:=1 to n-1 do
    if a[i]>a[imax] then imax:=i
    else
      if a[i]<a[imin] then imin:=i;
  if imin<imax then begin
    for i:=imin+1 to imax-1 do
      for j:=imin+1 to imax-1 do
        if a[i]>a[j] then Swap(a[i],a[j])
    end
  else
    for i:=imax+1 to imin-1 do
      for j:=imax+1 to imin-1 do
        if a[i]>a[j] then Swap(a[i],a[j]);
  a.Println
end.

Тестовое решение:
n= 15
46 87 95 49 86 17 43 61 15 57 23 60 84 75 82
46 87 95 86 61 49 43 17 15 57 23 60 84 75 82
diana-020
Я так понял на паскале нужно написать?
Program find;uses crt;varA:array[1..40] of integer;n,i ,k:integer;BEGINRandomize ;//Это ,чтобы каждый раз новые числа генерировало//Заполняем массив рандомными числамиfor i:=1 to 40 do  A[i] := random(15);
Writeln('Введите искомый элемент');Readln(n);
k:=0;for i:=1 to 40 do Begin                   // Проверяем,совпадает ли очередной эл-нт массива с искомым                   //Если совпадает, то увеличиваем счетчик k                   if A[i] = n  then k := k+1;                  End;
Writeln ('В массиве ', k , ' раз(а) встречается заданный элемент' );END.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Учитель работал в каталоге d: \материалы к урокам\10 класс\практические работы. затем перешел в дереве каталогов на уровень выше, спустился в подкаталог лекции и удалил из него файл введение. каково полное имя файла, который удалил преподаватель? выберите один ответ: d: \материалы к урокам\лекции\введение d: \материалы к урокам\введение\лекцииd: \материалы к урокам\10 класс\лекции\введение d: \материалы к урокам\10 класс\введение определите, по какой из масок будет выбрана указанная группа файлов make.cpp, name.c, age.pc, name.cpp выберите один ответ: a? e.* ? a? e.* *a*e.? *a? e.*
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

Конычева-музей&quot;260
cherry-sweet871435
xsmall1
Стародубцева_Васильевич485
dariamay1996
stark11
bagrjashv41
AnzhelikaSlabii1705
djevgen
Семеновна-Павел
Игоревна
is0019
MariyaKhanbalaeva585
dinadumno2114
razumeiko0790