Ответы на вопрос:
const
n=10;
var
arr; array[1.. 100] of integer;
i: integer;
begin
for i:=1 to n do
begin
read(arr[i]);
if arr [i]<0 then
arr[i]:=0
end;
for i:=1 to n do write (arr[i], ' ') ;
end.
2
const N = 15;
var
arr: array[1..N] of integer;
i, k: byte;
begin
randomize;
for i:=1 to N do begin
arr[i] := random(100) - 50;
write(arr[i]:4);
end;
writeln;
write('Введите k <= ', N, ': ');
readln(k);
if k > N then exit;
for i:=1 to k do arr[i] := -1 * arr[i];
for i:=1 to N do
write(arr[i]:4);
writeln;
end.
Непонятно. написать емкости возможные? так у хдд разная емкость, как и у флеек. а блю рей, как и cd, может быть 2х сторонним и двух слойным. например: cd - 1 слой, й сторона - 720мб 1 слой 2 стор - 1,4 гб 2 слой 2 стороны 2,8 гб то же для блю рея. а с дисками жесткими и флешками ваще беда
Популярно: Информатика
-
dogs224724.06.2021 13:17
-
Alexsandra219526.04.2022 05:57
-
Tryys02.04.2023 07:46
-
yesayes01.11.2020 22:24
-
володия07.10.2021 17:31
-
ЭймиКаннет15.06.2021 23:01
-
alenafgfgf06.12.2021 19:59
-
ruslan0707209.11.2022 23:23
-
Dirolling31.05.2021 13:25
-
Mishka051207.03.2021 19:05