Program znanija;
var A:array[1..20] of integer;
i,k,min,n:integer;
begin
min:=1000000000; // прощу прощение за такое )
for i:=1 to 20 do A[i]:=random(9); // заполняем массив
for i:=1 to high(A) do // находим минимальное нечётное, запоминаем его номер
if (A[i] < min) and (A[i] mod 2 <> 0) then begin
n:=i; min:=A[i];
end;
for i:=1 to 20 do write(A[i]:3); // Выводит весь массив
writeln(); // просто перевод на новую строку для красоты
writeln('Minimum: ',min,' Ego nomer: ',n); // выдаём минимальное и его номер
<span>end.</span>
К системным папкам относится и папка Рабочий стол, которая отображается как корневая в дереве Проводника. Эта папка содержит смесь различных объектов. В ней могут присутствовать как виртуальные объекты, так и обычные файлы и папки. Если на компьютере у каждого пользователя в Windows имеется своя учетная запись, то файлы, которые он помещает на рабочий стол видны лишь внутри этой учетной записи. Они хранятся на жестком внутри папки профиля в папке содержания рабочего стола. Однако, помимо личного рабочего стола пользователя, существует общий рабочий стол, объекты которого отображаются во всех учетных записях. Например, при установке программ, ярлыки на рабочем столе появляются в каждой учетной записи. Они тоже хранятся на диске, но размещены в так называемом общем профиле. Таким образом, системная папка Рабочий стол отображает не виртуальные объекты, такие как Корзина, Мой компьютер, но и содержание сразу двух обычных папок, которые расположены по разным путям на диске.
PascalABC.NET:
<em>program colors;</em>
<em>begin</em>
<em>writeln('черный');</em>
<em>writeln('коричневый');</em>
<em>writeln('красный');</em>
<em>writeln('жёлтый');</em>
<em>end.</em>
Примечание:
write('some_text%') - написать some_text%
writeln('some_text%') - написать some_text% и перейти на следующую строку
1.Андрей,старше Светы,также как Наташа или немного младше?
2.Один десятый класс,идёт на экскурсию в музей,а второй десятый класс идёт в театр или в филармонию.
3.На полке, в комнате Нади, стоят учебники и справочники,которые помогают ей понимать учебный материал.
4.Часть детей в классе- девочки,а ,остальные-мальчики,или же, в классе одинаковое количество девочек и мальчиков?