• 
  • 05 April 2012
  Английский язык
  • Автор: Angel2299

  

  НА QBASIC!!!!!!!!!!

  1)Для массива А. Найти количество положительных, сумму нечетных и произведение чисел, кратных В. Результаты расчетаа и массив вывести на экран.

  2)Для массива А опредилить сумму квадратов отрицательных элементов, произведение положительных элементов, нулевые-заменить числом 12. Результаты расчета и массив вывести на экран.

  3)Известны данные о количестве осадков, выпавших за каждый день января. Найти общее число осадков, выпавших по нечетным числам месяца.

  4)Известна стоимость каждого из 15 видов товаров. Напечатать номера тех видов товаров, которые имеют стоимость всех видов товаров.

  5)Дан массив А, отсортировать его по возрастанию. Отсортированный массив вывести на экран.

  6)Дан массив А, Отсортировать его по убыванию. Отсортированный массив вывести на экран.

• 
  • 05 April 2012
  • Ответ оставил: Гаааав

  5 6)
  input n
  dim a(n)
  
  for i=1 to n
    input a(i)
  next i
  
  for i=1 to n
    for j=i to n
    if a(i)>a(j) then 'поменяешь больше на меньше и будет сортировать в другую сторону
      t=a(i)
      a(i)=a(j)
      a(j)=t
    end if  
    next j
  next i
  
  for i=1 to n
    print a(i);
  next i
  ----------------------------
  Для массива А опредилить сумму квадратов отрицательных элементов, произведение положительных элементов, нулевые-заменить числом 12. Результаты расчета и массив вывести на экран.
  input n
  dim a(n)
  s=0
  p=1
  
  for i=1 to n
    input a(i)
  next i
  
  for i=1 to n
    if a(i)>0 then p=p*a(i)
    if a(i)<0 then s=s+a(i)*a(i)
    if a(i)=0 then a(i)=12
  next i
  
  for i=1 to n
    print a(i);
  next i
  
  print
  print s
  print p
  ----------------------------
  Известны данные о количестве осадков, выпавших за каждый день января. Найти общее число осадков, выпавших по нечетным числам месяца.
  n=31
  dim a(n)
  s=0
  
  for i=1 to n
    input a(i)
  next i
  
  for i=1 to n
    if i mod 2 =0  then s=s+a(i)
  next i
  
  print
  print s
  -------------------------
  Для массива А. Найти количество положительных, сумму нечетных и произведение чисел, кратных В. Результаты расчетаа и массив вывести на экран.
  input n
  input b
  dim a(n)
  s=0
  p=1
  k=0
  
  for i=1 to n
    input a(i)
  next i
  
  for i=1 to n
    if a(i)>0 then k=k+1
    if i mod 2 = 1 then s=s+a(i)
    if a mod b = 0 then p=p*a[i]
  next i
  
  for i=1 to n
    print a(i);
  next i
  
  print
  print s
  print p
  print b

  0
• 
  • НЕ НАШЛИ ОТВЕТ?

  Если вас не устраивает ответ или его нет, то попробуйте воспользоваться поиском на сайте и найти похожие ответы по предмету школьной программы: английский язык.
  На сегодняшний день (03.01.2025) наш сайт содержит 244793 вопросов, по теме: английский язык. Возможно среди них вы найдете подходящий ответ на свой вопрос.

  Найти другие ответы
• Нажимая на кнопку "Ответить на вопрос", я даю согласие на обработку персональных данных

  Ответить на вопрос

Последние опубликованные вопросы