Дана переменная $a =10. выведите значение этой переменной на экран

у дальних планет больше спутников по причине их большей массы. чем больше масса планеты - тем большую массу она притягивает и захватывает.

1+2+3-4+5-6=1

1+2+3+4/5+6-7=1

1+2+3-4+5-6+7/8=1

program primitive;

var a,b: integer;

begin 

read(a,b);

writeln(a mod b);

end.чему в школе то  

var a: array[1..20] of integer; s,i: integer; begin

s : = 0; for i : = 1 to 20 do begin a[i] : = random(40)-20; if a[i] > 0 thens : = s+a[i]; write(a[i]: 4); end; writeln; writeln(s); end.