помогите решить срочно надо
10-11 класс
|
2. Команда копирования
файлов copy (копировать) наиболее часто применяется в практической работе. Ее
действие похоже на работу ксерокса, когда Вы, используя оригинал документа,
получаете с помощью ксерокса дубликат этого документа. При копировании исходный
файл остается в неприкосновенности. Новый файл имеет точно такое же содержимое,
как исходный и указанное Вами имя. Команда копирования имеет уже знакомый нам
формат:
Например, выполнение команды
copy xxx.doc xxx.txt
обеспечивает копирование файла
xxx.doc в текущем каталоге и создание в этом же каталоге файла-дубликата с
именем xxx и расширением .txt,
Другие вопросы из категории
1739(10)->х(16)
199(10)->х(8)
155(10)->х(2)
201(10)->х(5)
-нечетные элементы матрицы. Выведите на экран все массивы.
ИЛИ
файла в килобайтах? В ответе указать только число без единиц измерения.
Массив заполнить случайными числами из [-1000; 1000]
Читайте также
Дан массив А1,.......Аn. найти максимальный и минимальный элементы и поменять их местами. Вот задача которую я делал:
program zadacha;
const
k=50;
var
a:array[1..k] of integer;
n,i:1..k;
c,v,max,min,prom:integer;
begin
for i:=1 to n do begin (здесь выскакивает ошибка о проверки диапазона)
a[i]:=random(50);
write(a[i],' ');
end;
max:=a[1];
min:=a[1];
for i:=1 to n do begin
if a[i]>max then begin
max:=a[i];
c:=i;
end;
if a[i]<min the begin
min:=a[i];
v:=i;
end;
end;
writeln('max=',max,'min=',min);
prom:=max; (вот с этой строчки и до конца помогите решить)
max:=min;
min:=prom;
writeln;
writeln('Полученный массив');
for i:=1 to n do
write(a[i], ' ');
readln;
end.