Определите результат работы программы, написанной на языке паскаль. 1) program a5 var i, m: integer; begin m: = 0 for i: = 1 to 6 do m: = m-6 writeln (m) end. 2) program a6 var i, m: integer; begin m: = 0; for i: = 3 to 7 do m: = m-6+i; writeln (m) end.

120

194

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

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

madike

Информатика

4,6(87 оценок)

1) program a5:

на экран будет выведено:

-36

2) program a6:

на экран будет выведено:

-5

zaxarenko2018

Информатика

4,8(96 оценок)

в результате выполнения программы a5 будет напечатанно: -36

в результате выполнения программы a6 будет напечатанно: -5

Мегамозг0511

Информатика

4,6(83 оценок)

Dim m as integer cls input "m=", m dim a(1 to m, 1 to m) as integer randomize timer for i = 1 to m for j = 1 to m a(i, j) = 50 * rnd - 25 print using "####"; a(i, j); next j print next i dim p as double, s as integer dim b(1 to m) as double p = 1 for i = 1 to m s = 0 for j = 1 to m if a(i, j) > 0 then p = p * a(i, j) s = s + a(i, j) next j b(i) = s / m next i print "p="; p print "vector" for i = 1 to m print using "###.#####"; b(i) next i пример m=5 3 -12 -2 -3 -4 11 -13 21 20 14 21 5 18 -20 -1 -3 24 -24 -19 8 -14 -24 -7 -2 -3 p= 70413235200 vector -3.60000 10.60000 4.60000 -2.80000 -10.00000