Исторически меняющаяся социальная форма отношений между женщиной и мужчиной, посредством которой общество упорядочивает

единорогкрейзимайт единорогкрейзимайт    1   17.04.2019 06:50    6

Ответы
14062006123 14062006123  06.06.2020 12:46

Prorgam z;

Var a:array [1..100] of integer;

      i,s:integer;

Begin

Randomize;

s:=0; 

For i:=1 to 10 do begin

a[i]:=random(100)+1;

If (a[i]>=15) then begin

If a[i]<=75 then begin

s:=s+a[i];

End;

Writeln(s);

End.

ПОКАЗАТЬ ОТВЕТЫ
Allison5 Allison5  06.06.2020 12:46

var a:array[1..10]of integer;

i,sum:integer;

begin

randomize;

for i:=1 to 10 do begin

a[i]:=random(51)+15;

sum:=sum+a[i];

end;

writeln(sum);

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Другие предметы