Даны множества: М = {5,4,6}, Р = {4,5,6}, Т = {5,6,7}, S = {4, 6}. Найдите T ∩ S (в ответе запишите числа в порядке возрастания без разделителей, слитно):

270

311

Посмотреть ответы 1

Ответы на вопрос:

STIX7

Информатика

4,7(42 оценок)

1) var a: array[1..10] of real; i: integer; begin randomize; for i: =1 to 10 do begin a[i]: = random(200) -100; write(a[i]: 5); end; writeln; for i: =1 to 10 do if a[i]> =0 then a[i]: =a[i]/2 else a[i]: =i; write(a[i]: 5); end. 2) var a: array[1..1000] of real; s1,s2: real; i,n: integer; begin write('введите кол-во элементов: '); readln(n); writeln('введите элементы массивы: '); for i: =1 to n do read(a[i]); s1: =0; s2: =0; for i: =1 to n do if odd(i) then s1: =s1+a[i] else s2: =s2+a[i]; writeln('сумма элементов с четными номерами: ',s2); writeln('сумма элементов с нечетными номерами: ',s1); end.