Liliya-buc
?>

Найдите ошибки, , не понимаю, что надо исправить сама : составить программу, которая вычисляет сумму тех элементов двумерного массива, номера строк и столбцов которых принадлежат соответственно непустым множествам s1 и s2. var a: array[1..20] of integer; n, m, i, j, k: byte; sm, b: integer; s1, s2: set of byte; begin randomize; repeat write('количество строк='); readln(m); until m in [1..10]; repeat write('количество столбцов='); readln(n); until n in [1..10]; writeln('исходная матрица: '); for i: =1 to m do begin for j: =1 to n do writeln; end; writeln; writeln('множество s1: '); s1: =[]; for i: =1 to m do begin b: =random(m)+1; s1: =s1+[b]; end; for i: =1 to m do if i in s1 then write(i, ' '); writeln; writeln('множество s2: '); s2: =[]; for i: =1 to n do begin b: =random(n)+1; s2: =s2+[b]; end; for i: =1 to n do if i in s2 then write(i, ' '); writeln; writeln; sm: =0; for i: =1 to m do for j: =1 to n do if(i in s1)and(j in s2) then sm: =sm+a[1..20]; write('сумма=', sm); readln end.

Информатика

Ответы

karasev17764
Четвёртая строка снизу:

if(i in s1)and(j in s2) then sm:=sm+a[1..20];

Вы к integer пытаетесь добавить array.
Smolkovaya
# Код на ruby 2.2.3p173
def automate(n)
    a = n / 1000
    b = n / 100 % 10
    c = n / 10 % 10
    d = n % 10
    t = [a*b, c*d]
    return (t.max.to_s + t.min.to_s).to_i
end

def zadanie()
    for i in 1000..9999
        t = automate(i)
        p [t, i] if t == 174
    end
end
# Примеры применения
zadanie()

ответ - нет таких цифр

Аналитическое решение
174 можно разложить на 1 + 74 и 17 + 4
по правилу 2 это только 17 + 4
17 - произведение двух чисел, но 17 простое и произведение только 17 и 1. 17 не может быть одной цифрой
Значит вариант 174 невозможен при таких правилах
Tselyaritskaya Yurevich

Объяснение:Временные значения денег

В зависимости от точки зрения, номинальное значение денег может быть различным. Ключевое понятие здесь — временное значение денег. Вычисления, производимые над денежными суммами, могут производиться в настоящем или в будущем. Выбор типа вычислений основывается на

том, что сумма денег увеличивается, поскольку постоянно поступают начисления по процентам. Другими словами, вложив

один рубль сегодня, завтра вы получите больше.

Например, предположим, что богатенький заокеанский

дядюшка решил подарить вам деньги, причем нужно выбрать

один из вариантов.

Получить 80 000 руб. сегодня.

Получить 95 000 руб. через год.

Получить 120 000 руб. через пять лет.

Получать 1 500 руб. каждый месяц на протя

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

Поделитесь своими знаниями, ответьте на вопрос:

Найдите ошибки, , не понимаю, что надо исправить сама : составить программу, которая вычисляет сумму тех элементов двумерного массива, номера строк и столбцов которых принадлежат соответственно непустым множествам s1 и s2. var a: array[1..20] of integer; n, m, i, j, k: byte; sm, b: integer; s1, s2: set of byte; begin randomize; repeat write('количество строк='); readln(m); until m in [1..10]; repeat write('количество столбцов='); readln(n); until n in [1..10]; writeln('исходная матрица: '); for i: =1 to m do begin for j: =1 to n do writeln; end; writeln; writeln('множество s1: '); s1: =[]; for i: =1 to m do begin b: =random(m)+1; s1: =s1+[b]; end; for i: =1 to m do if i in s1 then write(i, ' '); writeln; writeln('множество s2: '); s2: =[]; for i: =1 to n do begin b: =random(n)+1; s2: =s2+[b]; end; for i: =1 to n do if i in s2 then write(i, ' '); writeln; writeln; sm: =0; for i: =1 to m do for j: =1 to n do if(i in s1)and(j in s2) then sm: =sm+a[1..20]; write('сумма=', sm); readln end.
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

Olegmgu11986
oyunabaduraeva
vse-v-sad-sdesign
evamining
Aleksandrovich1075
inna-zub
melnik-738
annakorolkova79
Равилевич_Олеговна1496
Надо написать на языке python,
egcuzn86
sanina611
ANDREY261965
irohmichaelchikaodiri
Anatolevna1703
Lidburg