1<span>035 в 6 вот кароче как-то так. В десятичную сначала потом складываешь, потом делением на 6.</span>
Ответ :
в ) отделяет один раздел програми от другого...
1-ложь
2-истина
3-ложь
4-истина
5-истина
6-ложь
7-истина
8-ложь
9-истина
Программа со статическим массивом:
Var
M: array[1..32767] of real;
Min: real;
N, i: integer;
Begin
Write('N = ');ReadLn(N);
if (N <= 0) then
WriteLn('Количество элементов должно быть положительно')
else
begin
Write('Введите элементы массива в количестве ',N,' штук');
For i:= 1 to N do
Read(M[i]);
Min := M[1];
For i:= 2 to N do
if (M[i] < Min) then
Min := M[i];
WriteLn;
Write('Получившийся массив:');
For i:= 1 to N do
begin
M[i] := M[i] / Min;
Write(' ',M[i]);
end;
end
End.
Insert включает и отключает режим замены. В обычном режиме (вставки) вводимые символы вставляются в место положения курсора, в режиме замены вводимые символы заменяют стоящие справа от курсора. Совместно с Ctrl или Shift кнопка Insert позволяет скопировать или вставить текст.
Для считывания файла с диска нужно указать имя файла. Дата создания для считывания не нужна, размер файла (если это нужно) будет определён по имени.