Дан m(30). найти сумму элементов, больше 75. все - вопрос №55715413075 от хорошист547 11.03.2023 02:49

Question

Информатика: Дан m(30). найти сумму элементов, больше 75. все элементы введены с клавиатуры. (на паскале)

хорошист547 · Answer

Var m:array[1..30] of integer;var i, sum:integer;beginsum:=0;for i:=1 to 30 dobeginm[i]:=random(30001);write(m[i]+ );if(m[i] 75) then sum+=m[i];end;writeln( );write(sum);end....