выполните задание в экселе. Швейному предприятию необходимо произвести костюмы двух видов. На костюм 1-го вида требуется 3 м ткани и 5 м тесьмы. На костюм 2-го вида – 2 м ткани и 10 м тесьмы. Запас ткани – 28 м, запас тесьмы – 55 м. Прибыль, приносимая каждым видом костюма предприятию, равна 6 и 7 ден. ед. соответственно. Рассчитать оптимальный вариант производства костюмов, обеспечивающий максимум прибыли.

1+2+3-4+5-6=1

1+2+3+4/5+6-7=1

1+2+3-4+5-6+7/8=1

var i, j, min, min_i, min_j: integer; a: array[1..5, 1..5] of integer;

begin for i : = 1 to 5 do begin for j : = 1 to 5 do begin a[i, j] : = random(100) + 1; write(a[i, j]: 4); end; writeln; end; min : = 999; for i : = 1 to 5 do for j : = 1 to 5 do if min > a[i, j] then begin min : = a[i, j]; min_i : = i; min_j : = j; end; a[min_i, min_j] : = 0; writeln('массив с замененным минимальным элементом'); for i : = 1 to 5 do begin for j : = 1 to 5 do write(a[i, j]: 4); writeln; end; end.

qbasic не знаю, знаю только вижуал бэйсик

for i = 1 to 10

  a(i) = i

next i

for i = 1 to 5

  b = a(10+1-i)

  a(10+1-i) = a(i)

  a(i) = b

next i

s = 0;

for i = a to b

  if (i mod 2 =1) and (i mod 3 = 0) then

          s = s + 1

  end if

next i

классификации на : числа бывают: натуральными(1,2,3); целыми(2,   -5); дробными(6,73). на : предложения бывают: простыми, сложными: сложноподчинёнными, сложносочинёнными, сложными с разными связи, сложные бессоюзные.