<span>Индекс последнего отрицательного элемента массива.
Ответ: 5</span>
Ответ:
Паскаль
Program krug;
var r,d:real;
Begin
writeln ('Введите радиус круга ');
readln(r);
d:=2*r;
write ('Диаметр круга равен ', d);
End.
Объяснение:
Ответ:
Объяснение:
Вопрос некорректный.
Стандарты задаются предприятием (организацией), где издаются такие документы. В больших компаниях это называется корпоративным стилем. Единого стандарта нет.
Из предложенного списка, наиболее вероятным будет первый вариант шрифта <em>Times New Roman,14 .</em>
<em />
Дано
K= 100 стр
L= 60 строк
N=80 символов
Z= 1 байт
Q - ? Мбайт
Решение
ИНформационная емкость книги составит 100*60*80*1=480000 байт = 0,48 Мб
Var
m : array[1..4,1..4] of Integer;
m_new : array[1..4] of Integer;
i,j : Integer;
Begin
For i:=1 to 4 do
Begin
For j:=1 to 4 do
Begin
m[i,j]:=Random(100);
Write(m[i,j]:5);
If i=j then m_new[i]:=m[i,j];
end;
Writeln;
end;
Writeln('Главная диагнональ: ');
For i:=1 to 4 do Write(m_new[i]:5);
Writeln;
end.