Посмотри в интернете про это там всё есть и сам придумай это легкооо
Var mas: array[1..15] of integer;
i, min, max, nMin, nMax:integer;
begin
writeln('Введите 15 элементов массива');
for i := 1 to 15 do
readln(mas[i]);
min := mas[1];
max := mas[1];
nMin := 1;
nMax := 1;
for i := 1 to 15 do
begin
if max < mas[i] then
begin
max := mas[i];
nMax := i;
end;
if min > mas[i] then
begin
min := mas[i];
nMin := i;
end;
end;
writeln('Максимальное число и его номер ', max, ' ', nMax, ' Минимальное число и его номер ', min, ' ', nMin);
end.
Все отдельно посчитал но без таблицы, сам(а) нарисуешь все посчитал
Ещё 19 рублей прибавь к итоговой сумме и к консервам ещё 250г и их цене
Максимально подробно.
1 символ занимает 8 бит = 1 байт.
1 усл. п. л. занимает 96 Кбайт = 98304 байт = 98304 символов (1 Кбайт = 1024 байта)
4 усл. п.л. будут занимать 393216 символов.
Находим время: 393216 символов / 512 символов в секунду = 768 секунд = 12,8 минуты
Ответ: 12,8 минуты или 12 минут 48 секунд.