Const n=5; //размер массива
var a:array[1..n] of integer; i,xmax:intger;
begin
for i:=1 to n do begin
a[i]:=random(10); //заполняем массив случайными числами от 1 до 10
write(a[i]); // выводим массив
end;
xmax:=a[1];
for i:=1 to n do begin
if a[i]>xmax then xmax:=a[i]
end;
for i:=1 to n do
a[i]:=xmax;
writeln('Конечный массив:');
for i:=1 to n do
write(a[i]);
end.
На паскале
var a: integer;
begin
write('Введите целое число'); Readln(a);
if a>=0 then write(a*a) else write(a*a*a);
end.
При создании папки создается каталог, в котором могут хранится файлы. В файле так нельзя делать, только если это не специальный архив
Ответ:
Выделяем изображение. Правой кнопкой мыши вызываем окно свойств изображения. В этом окне выбираем пункт "Вставить название..." (возможны другие схожие варианты написания). В появившемся окне, в разделе "положение", выбираем вариант "Под выделенным объектом", в разделе "подпись" можно выбрать готовый текст - Рисунок, Таблица, Формула, а если эти текста не устраивают, то создаём свои в пункте "Создать...". В этом же окне нажимаем "ОК". Как-то так...
Объяснение:
объём книги
600*36*64 = 1382400 символов
При 1 байте на символ - 1382400 байт
64 кб/с - это килобиты в секунду?
Тогда, при 8 битах в байте, надо передать
1382400*8 = 11059200 бит
за секунду передаётся 64*1024= 65536 бит
а времени уйдёт
11059200/65536 = 168,75 с