У меня проблема с инфарматикой
Сор 3 четверть 8 класс
​

var

d1,d2,d3,d4: string;

begin

randomize;

readln(d1);

readln(d2);

readln(d3);

readln(d4);

case random(4) of

0: writeln(d1,d2,d3);

1: writeln(d1,d2,d4);

2: writeln(d2,d3,d4);

3: writeln(d1,d3,d4);

end;

end.

моя улица в солнечной системе. это земля. она находится третьей от солнца. 

2*3=6

512*128*6=393216

393216: 1024=384кб

s : = 1 ;

for i : = 1 to n do

  if a[i] mod 3 = 0 then

          s : = s * a[i];

writeln(s);