Выполнить операцию вычитания:

1)02-2; 2)12-101112; 3)1010102-1001012; 4)1110012-1001002; 5)7574738-2736548; 6)3575778-2340758; 7)f0010c16-5ff1fe16; 8)ee895216-2c627516; 9)2b3ca216-1fd39716; 10)78-1513248.

Question

Информатика: Выполнить операцию вычитания: 1)02-2; 2)12-101112; 3)1010102-1001012; 4)1110012-1001002; 5)7574738-2736548; 6)3575778-2340758; 7)f0010c16-5ff1fe16; 8)ee895216-2c627516; 9)2b3ca216-1fd39716; 10)78-1513248.

help1010100101020349 · Accepted Answer

Uses crt;
const n = 15;
var i, imin, imax, m, min, max, j: integer;
a: array[1..n]of integer;
begin
Writeln('Введите числа в массив');
for i := 1 to n do
readln(a[i]);
for i := 1 to n do
write(a[i], ' ');
min := a[1];
max := a[1];
imin := 1;
imax := 1;
for j := 1 to n do
begin
if(a[j] > max) then
begin
max := a[j];
imax := j;
end;
if(a[j] < min) then
begin
min := a[j];
imin := j;
end;
end;
writeln();
writeln('индекс минимального элемента ', imin, ' индекс максимального элемента ', imax);
m := abs(imin - imax);
Writeln();
Writeln('Кол-во элементов между макс. и мин. элементами ', m - 1);
end.

Выполнить операцию вычитания: 1)02-2; 2)12-101112; 3)1010102-1001012; 4)1110012-1001002; 5)7574738-2736548; 6)3575778-2340758; 7)f0010c16-5ff1fe16; 8)ee895216-2c627516; 9)2b3ca216-1fd39716; 10)78-1513248.

MOGZ ответил

Выполнить операцию вычитания:

1)02-2; 2)12-101112; 3)1010102-1001012; 4)1110012-1001002; 5)7574738-2736548; 6)3575778-2340758; 7)f0010c16-5ff1fe16; 8)ee895216-2c627516; 9)2b3ca216-1fd39716; 10)78-1513248.