Program p1;
uses crt;
var a:array[1..30] of integer;
sr,s:real;
i:integer;
begin
for i:=1 to 30 do begin
read(a[i]);
s:=s+a[i];
end;
sr:=s/30;
write(sr);
end.
Может быть материнская плата?
Если не ошибаюсь,то их чинят инженеры
образуются пары родителей:
655-861 (1 реб) подходит
323-354 (1 реб) не подходит
293-238 (1 реб) не подходит
654-960 (2 реб) подходит
941-365 (2реб) не подходит
1+2=3