Сформировать множества A и B

Slay

Сформировать множества A и B, базовый тип которых 20..50,по заданному числу элементов для каждого множества.Определить, в каком из множеств меньше элементов,затем найти среднее арифметическое элементов каждого из множеств.
11 ответов

Slay

Ты язык программирования не перепутал случайно? Понятия "множества" есть в Паскале, а в Бейсике такого понятия нет


Slay

нет но книжка по паскалю но у нас очееень умны преподаватель лекций не давал и говорит делайте ну если нет спасибо за информацию так ему и скажу


Slay

в Бейсике множества сведутся к массивам


Slay

и как тогда это реализовать?


Slay

но у нас очееень умны преподаватель лекций не давал и говорит делайте
Никогда не поверю что лекций не давал, забивать не надо. Препод не имеет права так делать, ему дали чёткую программу что вам зачитать, его задача зачитать, ваша записать, усвоить. Также не поверю что не было практики, вафлить не надо на занятиях. Преподы хоть и тупые бывают, но знания дают как полагается.И ещё - это курс дискретной алгебры, пока не прочитаешь книгу или лекцию не догонишь как делать. Касательно препода - язык программирования и само задание должно быть чётко описано, в противном случае можно смело предъявить претензию или попросить обосновать задание.


Slay

отвечаю не давал лекций


Slay

кто нибудь поможет решить?


Slay

Сформировать множества A и B, базовый тип которых 20..50,
формируешь два массива А и В (смотри:Как заполнить массив и вывести его на экран) заполняешь их числами от 20 до 50
по заданному числу элементов для каждого множества.
предварительно вводишь число элементов N и M (смотри там же)
Определить, в каком из множеств меньше элементов,
 if N>M then print" v pervom" else print "vo vtorom"
затем найти среднее арифметическое элементов каждого из множеств.
проходишь по каждому массиву циклом for, находишь сумму элементов, потом делишь на их количество, получаешь среднее арифметическое


Slay

CLS
INPUT"vvedite kolichestvo strok M ",m   'предварительно вводим число элементов
INPUT"vvedite kolichestvo stolbcov N ",n
DIM A(m,n)
 
INPUT"vvedite kolichestvo strok X ",x    'предварительно вводим число элементов
INPUT"vvedite kolichestvo stolbcov Y ",y
DIM B(x,y)
 
 
FOR i=1 TO m    'заполняю числами от 20 до 50 с клавы
FOR j=1 TO n
INPUT "vvedite element ",A(i,j)
NEXT
NEXT
 
FOR i=1 TO x     'заполняю числами от 20 до 50 с клавы
FOR j=1 TO y
INPUT "vvedite element ",B(i,j)
NEXT
NEXT
 
IF n>m THEN PRINT" v pervom" ELSE PRINT "vo vtorom"   'Определяю, в каком из множеств меньше элементов
 
FOR  i=1 TO (m*n)      'нахожу сумму элементов, потом делю на их количество, получаю среднее арифметическое ,ну покрайне мере на словах
print s=A(i)+A(i+1)
Next
PRINT z=s/(m*n)
 
FOR  i=1 TO (x*y)
print t=B(i)+B(i+1)
Next
PRINT w=t/(m*n)
помойму какаято ерунда получилась но я сидел покрайне мере с массивами я разобрался ,а вот как сумму всех элементов найти и разделить на их количество помойму накуралесил проверь пожалуйста


Slay

Ну, вот почти правильно, только массив надо брать одномерный и сумму поточнее находить
CLS
INPUT"vvedite kolichestvo elementov 1 mnojestva M ",m   'предварительно вводим число элементов
DIM A(m)
INPUT"vvedite kolichestvo elementov 2 mnojestva N ",n    'предварительно вводим число элементов
DIM B(n)
FOR i=1 TO m    'заполняю числами от 20 до 50 с клавы
INPUT "vvedite element 1 mnojestva ",A(i)
NEXT
FOR i=1 TO n     'заполняю числами от 20 до 50 с клавы
INPUT "vvedite element 2 mnojestva ",B(i)
NEXT
print"1 mnojestvo"
FOR i=1 TO m   
print A(i);
NEXT
print
print"2 mnojestvo"
FOR i=1 TO n    
print b(i);
NEXT
print
IF m>n THEN PRINT" v pervom bolshe" ELSE PRINT "vo vtorom bolshe"   'Определяю, в каком из множеств меньше элементов
FOR  i=1 TO m      'нахожу сумму элементов, потом делю на их количество, получаю среднее арифметическое ,ну покрайне мере на словах
s1=s1+A(i)
NEXT
z=s1/m
print "srednee arifmeticheskoe 1 mnojestva= ";z
FOR  i=1 TO n
 s2=s2+B(i)
NEXT
w=s1/n
print"srednee arifmeticheskoe 2 mnojestva= ";w


Slay

спасибо так гляди и программистом стану)