Написать программу которая даст таблицу Q5*5. Каждый эелемент ...
Написать программу которая даст таблицу Q5*5. Каждый эелемент таблицы случайное число из отрезка [-30,+30]. Вычислить сумму все отрицательных и сумму положительных элементов.
Есть ответ
17.12.2022
243
Ответ
var a,b,i,j,p,o: integer;z:real;m:array[0..31,0..31] of integer;beginrandomize;for i:=1 to 5 do for j:=1 to 5 do begin z:=random; b:=random(31); if z0.5 then m[i,j]:=-b; end; for i:=1 to 5 do for j:=1 to 5 do begin if m[i,j]>0 then p:=p+m[i,j]; if m[i,j]
Если вы нашли правильное решение, вы можете поблагодарить нас начиная с 10 рублей.
Просто нажмите на кнопку "Подарить".
Просто нажмите на кнопку "Подарить".
17.12.2022